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 /ext/SDBM_File/SDBM_File.pm | |
| parent | d825a42e0a67d546192c470c4cca7da269ab90b1 (diff) | |
| download | perl-c954a603b8f02c172ffe0fd3503b4d7ca983ad99.tar.gz | |
Quote string argument in example -- necessary if using strict subs
Diffstat (limited to 'ext/SDBM_File/SDBM_File.pm')
| -rw-r--r-- | ext/SDBM_File/SDBM_File.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/SDBM_File/SDBM_File.pm b/ext/SDBM_File/SDBM_File.pm index 9b7acc1e09..a2d4df8558 100644 --- a/ext/SDBM_File/SDBM_File.pm +++ b/ext/SDBM_File/SDBM_File.pm @@ -24,7 +24,7 @@ SDBM_File - Tied access to sdbm files use SDBM_File; - tie(%h,SDBM_File,'Op.dbmx', O_RDWR|O_CREAT, 0640); + tie(%h, 'SDBM_File', 'Op.dbmx', O_RDWR|O_CREAT, 0640); untie %h; |