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/Tie | |
| parent | d825a42e0a67d546192c470c4cca7da269ab90b1 (diff) | |
| download | perl-c954a603b8f02c172ffe0fd3503b4d7ca983ad99.tar.gz | |
Quote string argument in example -- necessary if using strict subs
Diffstat (limited to 'lib/Tie')
| -rw-r--r-- | lib/Tie/Hash.pm | 4 | ||||
| -rw-r--r-- | lib/Tie/Scalar.pm | 4 | ||||
| -rw-r--r-- | lib/Tie/SubstrHash.pm | 2 |
3 files changed, 5 insertions, 5 deletions
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 |