diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-02-09 01:16:18 +0000 |
|---|---|---|
| committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-02-09 01:16:18 +0000 |
| commit | af131e482fcca9737a77b6e1e76aea95f1e07760 (patch) | |
| tree | 0a80e347dfdf792e372615ffb9b128adb056600d /pod/perlbot.pod | |
| parent | f82b3d4130164d5f9a09b480e6fe013be65b6479 (diff) | |
| download | perl-af131e482fcca9737a77b6e1e76aea95f1e07760.tar.gz | |
Tie::Hash patch.
Diffstat (limited to 'pod/perlbot.pod')
| -rw-r--r-- | pod/perlbot.pod | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pod/perlbot.pod b/pod/perlbot.pod index 72c18703b4..0fd545fe88 100644 --- a/pod/perlbot.pod +++ b/pod/perlbot.pod @@ -251,8 +251,8 @@ This example demonstrates an interface for the SDBM class. This creates a package Mydbm; require SDBM_File; - require TieHash; - @ISA = qw( TieHash ); + require Tie::Hash; + @ISA = qw( Tie::Hash ); sub TIEHASH { my $type = shift; @@ -494,8 +494,8 @@ behavior by adding custom FETCH() and STORE() methods, if this is desired. package Mydbm; require SDBM_File; - require TieHash; - @ISA = qw(TieHash); + require Tie::Hash; + @ISA = qw(Tie::Hash); sub TIEHASH { my $type = shift; |