Parent Directory | Revision Log | Patch
revision 99 by dpavlin, Mon May 24 13:44:01 2004 UTC | revision 100 by dpavlin, Thu May 27 22:05:53 2004 UTC | |
---|---|---|
# | Line 15 use DB_File; | Line 15 use DB_File; |
15 | use strict; | use strict; |
16 | ||
17 | my %idx; | my %idx; |
18 | my $file = shift; | my $file = shift || die "$0: need index name\n"; |
19 | my $dbh = tie %idx, 'DB_File', $file, O_RDONLY, 0664, $DB_BTREE | my $dbh = tie %idx, 'DB_File', $file, O_RDONLY, 0664, $DB_BTREE |
20 | or die; | or die; |
21 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |