Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re^6: A refactoring trap

by adrianh (Chancellor)
on Aug 18, 2005 at 11:46 UTC ( #484725=note: print w/ replies, xml ) Need Help??


in reply to Re^5: A refactoring trap
in thread A refactoring trap

The problem with while (my $line = <DATA>) {} is real, it's just obscure

ARRRRGH! :-)

As has already been pointed out this hasn't been a problem for some time. Perl automatically adds the defined for you, as you can easily see by running:

a% perl -MO=Deparse -e 'while (my $line = <DATA>) {}' while (defined(my $line = <DATA>)) { (); } __DATA__ -e syntax OK

This hasn't been a problem for Perl for quite some time, and I wish people wouldn't keep saying it is ;-)


Comment on Re^6: A refactoring trap
Select or Download Code
Replies are listed 'Best First'.
Re^7: A refactoring trap
by revdiablo (Prior) on Aug 18, 2005 at 15:57 UTC
    this hasn't been a problem for some time. Perl automatically adds the defined for you

    Aye, I wrongly thought this only happened in the case of while (<FH>) {}. Sorry about the confusion.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://484725]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (10)
As of 2015-07-30 23:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (273 votes), past polls