my @find = $line[$i] =~ /\tabc\d\t/g