my %hash;

while (<FILE>) {

chomp;
my @line = split("\t");
push(@{$hash{$line[1]}}, [@line]);

}