SYNOPSIS
use Juman::GDBM_File;
use encoding "euc-jp";
tie( %hash, 'Juman::GDBM_File', $dbfile, &GDBM_WRCREAT, 0640 ) or die;
$hash{"XX"} = "X";
while( my( $key, $value ) = each %hash ){
print "$key:$value\n";
}
DESCRIPTION
Perl-5.8.x XXXXXXXXXXX Unicode XXXXXXXXXXXXXX XX EUC XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXX encode/decode XX XXXXXXXXX "Juman::GDBM_File" XXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX encode/decode XXXX
ENCODING
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "encoding" XXXXXXXXXX"encoding" XXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXCONSTRUCTOR
"GDBM_File" XXXXXXXXXXXXXXXXXXX
tie( %hash, 'Juman::GDBM_File', $dbfile, &GDBM_WRCREAT, 0640 );
X5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX
X5XXXXXXXXXXX"DB_File" XXXXXXXXXXXXXXXXX XX
tie( %hash, 'Juman::GDBM_File', $dbfile, &O_CREAT );
XXXXXXXXXXXXXXXXXXXXXXXXXXXXX4XXXXX "O_CREAT", "O_RDWR" XX "DB_File" XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "umask" XXXXXXXXXXXXXXXX
AUTHOR
- XX XX <[email protected]>
POD ERRORS
Hey! The above document had some coding errors, which are explained below:- Around line 22:
- Non-ASCII character seen before =encoding in '$hash{``XX''}'. Assuming UTF-8
- Around line 149:
-
=over without closing =back