my @find = $line[$i] =~ /\tabc\d\t/g #### my @find = $line[$i] =~ /\tabc\d+\t/g #### my @find = $line[$i] =~ /(?:\A|\t)abc\d+(?:\t|\z)/g #### my @find = $line[$i] =~ /(?:\A|\t)(abc\d+)(?=\t|\z)/g
## my @find = $line[$i] =~ /\tabc\d+\t/g ##
## my @find = $line[$i] =~ /(?:\A|\t)abc\d+(?:\t|\z)/g ##
## my @find = $line[$i] =~ /(?:\A|\t)(abc\d+)(?=\t|\z)/g