Help for this page

Select Code to Download

Select or download this

while($line=<TRF>)
    {
#          @line=split("\t",$trftable); # error 
          @line=split("\t",$line);

Select or download this

open MERGE,">","$folder/merge" 
        or die "Could not open $folder/merge : $!";