Searched refs:DB_File (Results 1 - 6 of 6) sorted by relevance
/netgear-WNDR4500v2-V1.0.0.60_1.0.38/ap/gpl/timemachine/db-4.7.25.NC/perl/DB_File/t/ |
H A D | db-btree.t | 17 print "1..0 # Skip: DB_File was not built\n"; 39 use DB_File; 131 my $db185mode = ($DB_File::db_version == 1 && ! $DB_File::db_185_compat) ; 132 my $null_keys_allowed = ($DB_File::db_ver < 2.004010 133 || $DB_File::db_ver >= 3.1 ); 142 my $dbh = new DB_File::BTREEINFO ; 172 ok(15, $@ =~ /^DB_File::BTREEINFO::STORE - Unknown element 'fred' at/ ) ; 174 ok(16, $@ =~ /^DB_File::BTREEINFO::FETCH - Unknown element 'fred' at/ ) ; 179 ok(17, $X = tie(%h, 'DB_File', [all...] |
H A D | db-hash.t | 17 print "1..0 # Skip: DB_File was not built\n"; 23 use DB_File; 95 my $null_keys_allowed = ($DB_File::db_ver < 2.004010 96 || $DB_File::db_ver >= 3.1 ); 104 my $dbh = new DB_File::HASHINFO ; 134 ok(13, $@ =~ /^DB_File::HASHINFO::STORE - Unknown element 'fred' at/ ); 136 ok(14, $@ =~ /^DB_File::HASHINFO::FETCH - Unknown element 'fred' at/ ); 141 ok(15, $X = tie(%h, 'DB_File',$Dfile, O_RDWR|O_CREAT, 0640, $DB_HASH ) ); 196 ok(22, $X = tie(%h,'DB_File',$Dfile, O_RDWR, 0640) ); 351 ok(44, tie(%h, 'DB_File', [all...] |
H A D | db-recno.t | 17 print "1..0 # Skip: DB_File was not built\n"; 23 use DB_File; 165 $dbh = new DB_File::RECNOINFO ; 198 ok(15, $@ =~ /^DB_File::RECNOINFO::STORE - Unknown element 'fred' at/ ); 200 ok(16, $@ =~ /^DB_File::RECNOINFO::FETCH - Unknown element 'fred' at/ ); 206 ok(17, $X = tie @h, 'DB_File', $Dfile, O_RDWR|O_CREAT, 0640, $DB_RECNO ) ; 334 my $dbh = new DB_File::RECNOINFO ; 335 ok(59, tie @h, 'DB_File', $Dfile, O_RDWR|O_CREAT, 0640, $dbh ) ; 349 my $dbh = new DB_File::RECNOINFO ; 351 ok(62, tie @h, 'DB_File', [all...] |
/netgear-WNDR4500v2-V1.0.0.60_1.0.38/ap/gpl/timemachine/db-4.7.25.NC/perl/DB_File/ |
H A D | DB_File.pm | 0 # DB_File.pm -- Perl 5 interface to Berkeley DB 12 package DB_File::HASHINFO ; 20 @DB_File::HASHINFO::ISA = qw(Tie::Hash); 92 croak "DB_File::HASHINFO::DELETE - Unknown element '$key'" ; 115 package DB_File::RECNOINFO ; 120 @DB_File::RECNOINFO::ISA = qw(DB_File::HASHINFO) ; 133 package DB_File::BTREEINFO ; 138 @DB_File::BTREEINFO::ISA = qw(DB_File 159 package DB_File ; package [all...] |
H A D | DB_File.xs | 3 DB_File.xs -- Perl 5 interface to Berkeley DB 36 1.08 - No change to DB_File.xs 40 1.11 - No change to DB_File.xs 41 1.12 - No change to DB_File.xs 52 1.56 - No change to DB_File.xs 57 1.59 - No change to DB_File.xs 61 1.62 - No change to DB_File.xs 76 Added a new Perl variable $DB_File::db_ver 77 1.70 - Initialise $DB_File::db_ver and $DB_File [all...] |
H A D | Makefile.PL | 7 die "DB_File needs Perl 5.004_05 or better. This is $]\n" 19 my @files = ('DB_File.pm', glob "t/*.t") ; 45 NAME => 'DB_File', 49 VERSION_FROM => 'DB_File.pm', 50 XS_VERSION => eval MM->parse_version('DB_File.pm'), 53 OBJECT => 'version$(OBJ_EXT) DB_File$(OBJ_EXT)', 60 ? (ABSTRACT_FROM => 'DB_File.pm', 108 # Check the constants above all appear in @EXPORT in DB_File.pm 110 open F, "<DB_File.pm" or die "Cannot open DB_File [all...] |
Completed in 101 milliseconds