Help for this page

Select Code to Download

Select or download this

while ( $line = <FH> ) { 
  # do stuff to $line
}

Select or download this
```
#!/usr/bin/perl

...
4
5
6
```