Select Code to Download

2_SecVal    4    1 1 0 0 0 1 0 0 1 0
1_SecVal    4    1 0 1 0 1 0 0 0 1 0
...
6_FirVal    5    1 0 1 0 1 1 0 0 1 0
6_SecVal    5    1 0 1 0 0 0 1 1 0 1
7_SecVal    5    1 1 0 0 0 0 1 1 0 1

while(<$IN>){
...
        print "H$j\tMatching Pattern as $key1\t $count\n";
        $j++;
   }