Select Code to Download

($current) = $everything =~ m/<!---CURCON-->(.*)<!---END CURCON-->/s;

$new = $start . $current . $end;