develooper Front page | perl.perl5.porters | Postings from March 2003

Re: [fix] [perl #21575] Bug with print( followed by a newline

Thread Previous | Thread Next
From:
Enache Adrian
Date:
March 14, 2003 14:56
Subject:
Re: [fix] [perl #21575] Bug with print( followed by a newline
Message ID:
20030314230213.GA1361@ratsnest.hole
On Fri, Mar 14, 2003 at 10:41:17PM +0100, Rafael Garcia-Suarez wrote:
> Looks correct. Thanks, applied as #18986. I added a test, in the most
> simple way I could find :

(just for fun, your test is probably sufficient)

------------------------------------------------------
eval {
    { package A; sub TIEHANDLE {bless{}} sub PRINT {} }
    tie *B, A; my @a=(13);
    print(
    	B $a[0]);
};
is ($@, '', '#21575 print(\\n .. args ..)');
Thread Previous | Thread Next

nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About