ext/SDBM_File/SDBM_File.pm

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