diff options
author | Michael G. Schwern <schwern@pobox.com> | 2008-01-02 09:08:36 -0800 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-01-06 16:03:13 +0000 |
commit | 3a28f3fb1bfd44e4e3dfe6842af867c8c1c9de28 (patch) | |
tree | c9a77da0789972574a11b9da07bc9d124e969ec3 /pod/perltie.pod | |
parent | e1f17637d1ade6d468d3aebe31c7b7a17f6fc053 (diff) | |
download | perl-3a28f3fb1bfd44e4e3dfe6842af867c8c1c9de28.tar.gz |
Re: [perl #49264] say behaves as just print on tied filehandle
Message-ID: <477C3594.9080302@pobox.com>
p4raw-id: //depot/perl@32873
Diffstat (limited to 'pod/perltie.pod')
-rw-r--r-- | pod/perltie.pod | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/pod/perltie.pod b/pod/perltie.pod index 9ee5b2c487..162272bd74 100644 --- a/pod/perltie.pod +++ b/pod/perltie.pod @@ -900,12 +900,14 @@ C<syswrite> function. X<PRINT> This method will be triggered every time the tied handle is printed to -with the C<print()> function. -Beyond its self reference it also expects the list that was passed to -the print function. +with the C<print()> or C<say()> functions. Beyond its self reference +it also expects the list that was passed to the print function. sub PRINT { $r = shift; $$r++; print join($,,map(uc($_),@_)),$\ } +C<say()> acts just like C<print()> except $\ will be localized to C<\n> so +you need do nothing special to handle C<say()> in C<PRINT()>. + =item PRINTF this, LIST X<PRINTF> |