Help for this page

Select Code to Download


  1. or download this
    #!/sw/perl5/1.1/bin/perl
use strict;
...
select INFILE;
close(INFILE);
  2. or download this
    #!/sw/perl5/1.1/bin/perl
use strict;
...
}
select INFILE;
close(INFILE);