my ($good_stuff) = $stuff =~ /^START$(.*?)^END$/ms;