$string = "useridagohiluserid>traderidagohiltraderidjiagohilji"; if ($string =~ /traderid(.*?)traderid/sig) { $string =~ s/$1/myword/ ; } print "$string\n" ; #### useridagohiluserid>traderidmywordtraderidjiagohilji #### useridmyworduserid>traderidagohiltraderidjiagohilji