Select Code to Download

if ($_ =~ m/($regex)/ && $regex =~ /(.*)/s) {
    ... Now $1 will contain $regex ...
}