($variable) = $string =~ /foo(.*?)bar/;