1. while (<>) { ... } or while (my $line = <>) { ... }?