$string =~ s/(.*)\s*two/$1/; #### $string =~ s/(.*)(^|\s+)two/$1/;