Help for this page
while (defined($_ = <STDIN>)) { print; } while ($_ = <STDIN>) { print; } ... print while defined($_ = <STDIN>); print while ($_ = <STDIN>); print while <STDIN>;