Select Code to Download

ID    file1   file2   file3   file4   file5 ...file25
ID1   ABC12   ABC12     -     ABC12     -      ABC12
...
......
ID1072  -     PQR34   PQR34     -     PQR34      -

#!/usr/bin/perl
use warnings;
...
  print " ", $elems[0];
  print "\n";
}

#!/usr/bin/perl
use strict;
...
    print "Word: $key Repeat_Count: " . ($wordcount{$key} ) . "\n";
}

ID1  ABC12  4
ID2  XYZ11  2
...
......
......
ID1072 PQR34 3