my @ra = map { ( split )[1] } split /\t/, @data1;