Help for this page

Select Code to Download

Select or download this

while (<DATA> and !$flag){print;}
error is: Use of uninitialized value $_ in print at C:\testwhile.pl li
+ne 8, <DATA> line 1.
...

while (defined($_=<DATA>) and !$flag)
no error