Help for this page

Select Code to Download

Select or download this

use strict;

...

print "$_\n" while (<>);

Select or download this
```
my @var;
push(@var, $_) while(<>);
```