Select Code to Download

    if (!(
        print($out_fh $gd->jpeg())
...
        unlink($out_qfn);
        next;
    }

    if (!print($out_fh $gd->jpeg())) {
        warn("Error writing file \"$out_qfn\": $!. Skipping\n");
...
        unlink($out_qfn);
        next;
    }