tied() documentation

[perl5.git] / ext / ODBM_File / ODBM_File.pm

diff --git a/ext/ODBM_File/ODBM_File.pm b/ext/ODBM_File/ODBM_File.pm
index 336af3d..a96916b 100644 (file)
--- a/ext/ODBM_File/ODBM_File.pm
+++ b/ext/ODBM_File/ODBM_File.pm
@@ -1,12 +1,16 @@
 package ODBM_File;
 
-require TieHash;
+use strict;
+use vars qw($VERSION @ISA);
+
+require Tie::Hash;
 require DynaLoader;
-@ISA = qw(TieHash DynaLoader);
 
-$VERSION = $VERSION = "1.00";
+@ISA = qw(Tie::Hash DynaLoader);
+
+$VERSION = "1.00";
 
-bootstrap ODBM_File;
+bootstrap ODBM_File $VERSION;
 
 1;