Select Code to Download

if ($url !~ /$regex/)
    {
    die "Can't find url of file in page.\n";
    }
$response = $ua->get($1, ':content_file' => $2);