local $/ = \10; # Easier to visualize than 80. print "$_\n" while ; __DATA__ abcdefghijklm ABCDEFGHIJKLM