http://www.perlmonks.org?node_id=486026


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

Dispite that many has pointed out that

while (my $line = <DATA>) { ... } while (defined (my $line = <DATA>)) { ... }
are identical, your first remark is true. The problem lies elsewhere:
while (<DATA>) { ... }
doesn't localize $_ and thus leaves $_ undefined after the loop.
while (my $line = <DATA>) { ... }
doesn't suffer from this as it doesn't touch $_.

If put in a subroutine this innocent little bug cause a serious headache while trying to find out why $_ all of a sudden is undefined.

ihb

See perltoc if you don't know which perldoc to read!