m/^A.TL5 ([EF]) # my match here 00/x #### s/^A.TL5 ([EF]) # my match here 00 / NEW \s+ {$1} # replae here /x #### s/^A.TL5 ([EF]) # my match here 00 /NEW {$1}/x