my $res = $mech->mirror ("download_link");
        #      ^ there
print " response is :", $res, "\n\n"; # no content