Commit | Line | Data |
---|---|---|
a0d0e21e | 1 | package ODBM_File; |
2 | ||
96318ac8 | 3 | use strict; |
96318ac8 | 4 | |
5 | require Tie::Hash; | |
ef7f72ff | 6 | use XSLoader (); |
a0d0e21e | 7 | |
17f410f9 | 8 | our @ISA = qw(Tie::Hash); |
9 | our $VERSION = "1.02"; | |
c07a80fd | 10 | |
9426adcd | 11 | XSLoader::load 'ODBM_File', $VERSION; |
a0d0e21e | 12 | |
13 | 1; | |
14 | ||
15 | __END__ | |
a5f75d66 | 16 | |
17 | =head1 NAME | |
18 | ||
19 | ODBM_File - Tied access to odbm files | |
20 | ||
21 | =head1 SYNOPSIS | |
22 | ||
23 | use ODBM_File; | |
24 | ||
c954a603 | 25 | tie(%h, 'ODBM_File', 'Op.dbmx', O_RDWR|O_CREAT, 0640); |
a5f75d66 | 26 | |
27 | untie %h; | |
28 | ||
29 | =head1 DESCRIPTION | |
30 | ||
9fe6733a | 31 | See L<perlfunc/tie>, L<perldbmfilter> |
a5f75d66 | 32 | |
33 | =cut |