my @find = $line[$i] =~ /\babc10\b/g;