Select Code to Download

Select or download this

check.1.ABC.dat.gz
check.1.ABC_TT1.dat
check.1.AB_TT1.dat
check.1.ABC.dat

Select or download this

open(DETAIL, "> $DetailFilename") or die("Error: $!");
print DETAIL "$DetailFileHeader\n";
...
$Count1 = $Count1 - $result{$key}->[1];
print DETAIL "$pattern-2013,$Gkel_file,$Count,$Count,$result{$key}->[0
+],$result{$key}->[1],$file1,$Count1,$Count1,TRUE\n";    
}

Select or download this

Jun-2013    Gkel_check.1.ABC.dat.gz    108418    108418    check.1.ABC
+_TT1.dat    470    ,check.1.ABC.dat    107672    107672    TRUE
Jun-2013    Gkel_check.1.ABC.dat.gz    108418    108418    check.1.AB_
+TT1.dat    278    ,check.1.ABC.dat    108142    108142    TRUE

Select or download this

                                    
Jun-2013    Gkel_check.1.ABC.dat.gz    108,418    108,418    check.1.A
+BC_TT1.dat    470    check.1.ABC.dat 107,670    107,670 TRUE
                            check.1.AB_TT1.dat    278