home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl560.zip / ext / NDBM_File / NDBM_File.pm < prev    next >
Text File  |  2000-01-23  |  468b  |  39 lines

  1. package NDBM_File;
  2.  
  3. BEGIN {
  4.     if ($] >= 5.002) {
  5.     use strict;
  6.     }
  7. }
  8.  
  9. require Tie::Hash;
  10. use XSLoader ();
  11.  
  12. our @ISA = qw(Tie::Hash);
  13. our $VERSION = "1.03";
  14.  
  15. XSLoader::load 'NDBM_File', $VERSION;
  16.  
  17. 1;
  18.  
  19. __END__
  20.  
  21. =head1 NAME
  22.  
  23. NDBM_File - Tied access to ndbm files
  24.  
  25. =head1 SYNOPSIS
  26.  
  27.  use NDBM_File;
  28.  use Fcntl;       # for O_ constants
  29.  
  30.  tie(%h, 'NDBM_File', 'Op.dbmx', O_RDWR|O_CREAT, 0640);
  31.  
  32.  untie %h;
  33.  
  34. =head1 DESCRIPTION
  35.  
  36. See L<perlfunc/tie>, L<perldbmfilter>
  37.  
  38. =cut
  39.