Lines Matching refs:BerkeleyDB
8 use BerkeleyDB;
24 eval ' $db = new BerkeleyDB::Recno -Stupid => 3 ; ' ;
27 eval ' $db = new BerkeleyDB::Recno -Bad => 2, -Mode => 0345, -Stupid => 3; ' ;
30 eval ' $db = new BerkeleyDB::Recno -Env => 2 ' ;
31 ok 3, $@ =~ /^Env not of type BerkeleyDB::Env/ ;
33 eval ' $db = new BerkeleyDB::Recno -Txn => "x" ' ;
34 ok 4, $@ =~ /^Txn not of type BerkeleyDB::Txn/ ;
37 eval ' $db = new BerkeleyDB::Recno -Env => $obj ' ;
38 ok 5, $@ =~ /^Env not of type BerkeleyDB::Env/ ;
46 ok 6, my $db = new BerkeleyDB::Recno -Filename => $Dfile,
94 ok 28, my $env = new BerkeleyDB::Env -Flags => DB_CREATE|DB_INIT_MPOOL,@StdErrFile,
97 ok 29, my $db = new BerkeleyDB::Recno -Filename => $Dfile,
117 ok 33, my $db = new BerkeleyDB::Recno -Filename => $Dfile,
184 ok 46, $db = tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
293 ok 97, my $db = tie @array, 'BerkeleyDB::Recno' ;
307 ok 101, my $db = new BerkeleyDB::Recno, -Filename => $Dfile,
391 ok 141, my $db = tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
462 ok 168, my $env = new BerkeleyDB::Env -Home => $home,@StdErrFile,
466 ok 170, my $db1 = tie @array, 'BerkeleyDB::Recno',
528 my $recs = ($BerkeleyDB::db_version >= 3.1 ? "bt_ndata" : "bt_nrecs") ;
531 ok 179, my $db = new BerkeleyDB::Recno -Filename => $Dfile,
574 use BerkeleyDB;
575 @ISA=qw(BerkeleyDB BerkeleyDB::Recno);
576 @EXPORT = @BerkeleyDB::EXPORT ;
647 ok 194, tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
667 ok 196, tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
688 ok 198, tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
709 ok 200, tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
730 ok 202, my $db = tie @array, 'BerkeleyDB::Recno', -Filename => $Dfile,
759 ok 210, my $db = tie @array, 'BerkeleyDB::Recno',
782 ok 213, tie @array, 'BerkeleyDB::Recno', -Source => $Dfile2 ,
802 ok 215, tie @array, 'BerkeleyDB::Recno',
824 ok 217, tie @array, 'BerkeleyDB::Recno', -ArrayBase => 0,
845 ok 219, tie @array, 'BerkeleyDB::Recno',
866 ok 221, $db = tie @array, 'BerkeleyDB::Recno',
887 ok 224, $db = tie @array, 'BerkeleyDB::Recno',