my ($new_source) = $source =~ /<!-- InstanceBeginEditable name="guts" -->(.*?)<!-- InstanceEndEditable -->/s;