Help for this page

Select Code to Download

Select or download this

open (FILE, "$file") || die "Can't open $file";
       $tmp=<FILE>;
...
               push(@hashkeys, $_);
           
       }

Select or download this

my @hashkeys;
open (FILE, "$file") || die "Can't open $file";
...
                push(@hashkeys, $fields[0]); # or perhaps it's some ot
+her 
                                             # field you want?
           }