Help for this page

Select Code to Download

Select or download this
```
use strict;
use warnings;
```

Select or download this

my $file =...
open (TEMP, $file) or die("Error: cannot open $file\n");
my $outfile =...