$a = "blah bla blah"; $b = $a; $b =~ s/blah (bla) blah/$1/;