my $i="";
my $t="";
my @data="";