1 2 3 4 5 6 7 8 9 10 11 12 13
package SDBM_File; require TieHash; require DynaLoader; @ISA = qw(TieHash DynaLoader); $VERSION = $VERSION = "1.00" ; bootstrap SDBM_File; 1; __END__