Help for this page

Select Code to Download

Select or download this
```
foreach my $line (<STDIN>) {
    ...
}
```

Select or download this

while ( my $line = <STDIN> ) {
    ...
}