From 3a28f3fb1bfd44e4e3dfe6842af867c8c1c9de28 Mon Sep 17 00:00:00 2001
From: "Michael G. Schwern" <schwern@pobox.com>
Date: Wed, 2 Jan 2008 09:08:36 -0800
Subject: Re: [perl #49264] say behaves as just print on tied filehandle
 Message-ID: <477C3594.9080302@pobox.com>

p4raw-id: //depot/perl@32873
---
 pod/perltie.pod | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'pod')

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>
 
-- 
cgit v1.2.1