Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...

close $in
    or die "Cannot close file '$in_file': $!";