Help for this page

Select Code to Download

Select or download this

#!/sw/perl5/1.1/bin/perl
use strict;
...
#close $filehandle or die "Fail on close '$filename': $!";
close(INFILE);

Select or download this

**** Close file 126 here
**** Open file 127 here
...

**** Close file 129 here
**** Open file 130 here