my @row1 = ('Jun-2013',$Gkel_gz[0],$Gkel_gz[1],$TT1[0]->[0],$TT1[0]->[1],$Gkel[0],$Gkel[1]);

my @row2 = ($TT1[1]->[0],$TT1[1]->[1]);

print DETAIL "Jun-2013,$Gkel_gz[0],$Gkel_gz[1],$Gkel_gz[1],$TT1[0]->[0],$TT1[0]->[1],$Gkel[0],$Gkel[1],$Gkel[1],TRUE\n";
print DETAIL "'\t','\t','\t','\t',$TT1[1]->[0],$TT1[1]->[1]\n";

##</code><code>##

Jun-2013 Gkel_check.1.ABC.dat.gz count check.1.ABC_TT1.dat count check.1.ABC.dat.gz count	

##</code><code>##

check.1.AB_TT1.dat count

##</code><code>##

Jun-2013 Gkel_check.1.ABC.dat.gz count check.1.ABC_TT1.dat count check.1.ABC.dat.gz count	
				       check.1.AB_TT1.dat count