Help for this page

Select Code to Download


  1. or download this
    #!usr/bin/perl -w
use strict;
use autodie;
...
close BACT;
close OUTPUT;
  2. or download this
    Filehandle OUTPUT opened only for output at C:\strawberry\perl\bin\tri
+al.pl line 9.
Use of uninitialized value in string eq at C:\strawberry\perl\bin\tria
+l.pl line 24, <BACT> line 17.