diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/AnyDBM_File.pm | 4 | ||||
| -rw-r--r-- | lib/Tie/Hash.pm | 4 | ||||
| -rw-r--r-- | lib/Tie/Scalar.pm | 4 | ||||
| -rw-r--r-- | lib/Tie/SubstrHash.pm | 2 |
4 files changed, 7 insertions, 7 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 diff --git a/lib/Tie/Hash.pm b/lib/Tie/Hash.pm index 9a9d059a7f..20b6777978 100644 --- a/lib/Tie/Hash.pm +++ b/lib/Tie/Hash.pm @@ -26,8 +26,8 @@ Tie::Hash, Tie::StdHash - base class definitions for tied hashes package main; - tie %new_hash, NewHash; - tie %new_std_hash, NewStdHash; + tie %new_hash, 'NewHash'; + tie %new_std_hash, 'NewStdHash'; =head1 DESCRIPTION diff --git a/lib/Tie/Scalar.pm b/lib/Tie/Scalar.pm index 2db02ae1da..ef27dc1398 100644 --- a/lib/Tie/Scalar.pm +++ b/lib/Tie/Scalar.pm @@ -26,8 +26,8 @@ Tie::Scalar, Tie::StdScalar - base class definitions for tied scalars package main; - tie $new_scalar, NewScalar; - tie $new_std_scalar, NewStdScalar; + tie $new_scalar, 'NewScalar'; + tie $new_std_scalar, 'NewStdScalar'; =head1 DESCRIPTION diff --git a/lib/Tie/SubstrHash.pm b/lib/Tie/SubstrHash.pm index a01c66ef8d..825f305714 100644 --- a/lib/Tie/SubstrHash.pm +++ b/lib/Tie/SubstrHash.pm @@ -8,7 +8,7 @@ Tie::SubstrHash - Fixed-table-size, fixed-key-length hashing require Tie::SubstrHash; - tie %myhash, Tie::SubstrHash, $key_len, $value_len, $table_size; + tie %myhash, 'Tie::SubstrHash', $key_len, $value_len, $table_size; =head1 DESCRIPTION |