Select Code to Download

sub getstore ($$)
{
    my($url, $file) = @_;
...

    $response->code;
}

        elsif (!ref($arg) && length($arg)) {
            open(my $fh, ">", $arg) or die "Can't write to '$arg': $!"
+;
        binmode($fh);
...
                    1;
                },
            });