> while (defined($line = <>))

This line looks good in any standard setup (e.g., using perl on the
terminal in osx). What is your setup? Are you sure that the problem
is not elsewhere?

Regards,

Marco

Reply via email to