diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-13 21:29:15 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-13 21:29:15 +0000 |
commit | 9f1b1f2d9ab55954ee07a14c4ab04bd3dd1f99d5 (patch) | |
tree | f3e99c675e49f21e2edc6600cd4c0b10b14c41d5 /pod/perltie.pod | |
parent | 828c4421567f1da54062ec5edfcc3250be409b16 (diff) | |
download | perl-9f1b1f2d9ab55954ee07a14c4ab04bd3dd1f99d5.tar.gz |
lexical warnings update for docs and tests (from Paul Marquess)
p4raw-id: //depot/perl@5712
Diffstat (limited to 'pod/perltie.pod')
-rw-r--r-- | pod/perltie.pod | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/pod/perltie.pod b/pod/perltie.pod index 92040528e9..c835738573 100644 --- a/pod/perltie.pod +++ b/pod/perltie.pod @@ -743,6 +743,7 @@ a scalar. package Remember; use strict; + use warnings; use IO::File; sub TIESCALAR { @@ -845,7 +846,8 @@ have not been flushed to disk. Now that you know what the problem is, what can you do to avoid it? Well, the good old C<-w> flag will spot any instances where you call untie() and there are still valid references to the tied object. If -the second script above is run with the C<-w> flag, Perl prints this +the second script above this near the top C<use warnings 'untie'> +or was run with the C<-w> flag, Perl prints this warning message: untie attempted while 1 inner references still exist |