diff options
author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-07-15 00:36:25 +0000 |
---|---|---|
committer | Charles Bailey <bailey@genetics.upenn.edu> | 1996-07-15 00:36:25 +0000 |
commit | c954a603b8f02c172ffe0fd3503b4d7ca983ad99 (patch) | |
tree | 73abb08ca471579b836d3c6aa18efcce51cd59bd /lib/AnyDBM_File.pm | |
parent | d825a42e0a67d546192c470c4cca7da269ab90b1 (diff) | |
download | perl-c954a603b8f02c172ffe0fd3503b4d7ca983ad99.tar.gz |
Quote string argument in example -- necessary if using strict subs
Diffstat (limited to 'lib/AnyDBM_File.pm')
-rw-r--r-- | lib/AnyDBM_File.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/AnyDBM_File.pm b/lib/AnyDBM_File.pm index 50acce412a..c985e7ed25 100644 --- a/lib/AnyDBM_File.pm +++ b/lib/AnyDBM_File.pm @@ -39,8 +39,8 @@ will only find GDBM_File. Having multiple DBM implementations makes it trivial to copy database formats: use POSIX; use NDBM_File; use DB_File; - tie %newhash, DB_File, $new_filename, O_CREAT|O_RDWR; - tie %oldhash, NDBM_File, $old_filename, 1, 0; + tie %newhash, 'DB_File', $new_filename, O_CREAT|O_RDWR; + tie %oldhash, 'NDBM_File', $old_filename, 1, 0; %newhash = %oldhash; =head2 DBM Comparisons |