in reply to Difference between 'print while' and 'while print'
1 while print $fh "foo"; [download]
is different from
print $fh "foo" while 1; [download]
The first one will stop when the print eventually fills up the device that its writing to, the second one wont.