Parent Directory | Revision Log | Patch
revision 307 by dpavlin, Tue Dec 20 00:03:04 2005 UTC | revision 497 by dpavlin, Sun May 14 19:45:36 2006 UTC | |
---|---|---|
# | Line 48 sub init { | Line 48 sub init { |
48 | ||
49 | =head2 open_db | =head2 open_db |
50 | ||
51 | Returns handle to database | Returns handle to database and size in records |
52 | ||
53 | my $db = $open_db( | my ($db,$size) = $open_db( |
54 | path => '/path/to/LIBRI' | path => '/path/to/LIBRI' |
55 | } | } |
56 | ||
# | Line 130 sub fetch_rec { | Line 130 sub fetch_rec { |
130 | } else { | } else { |
131 | $val = $l; | $val = $l; |
132 | } | } |
133 | push @{$rec->{$k}}, $val; | push @{$rec->{"$k"}}, $val; |
134 | } | } |
135 | } else { | } else { |
136 | push @{$rec->{'000'}}, $mfn; | push @{$rec->{'000'}}, $mfn; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |