Mega Code Archive
Categories
/
Perl
/
Statement
Use while loop to read console input
while ($_ = <>) { print $_; } while (<>) { print; }