You need to do a deepcopy. Replace:

my %newhash = %hashcopy;
[download]

With something like this:

use Storable qw(dclone);

my %newhash = %{dclone(%hashcopy)};
[download]

We could use thaw and freeze, but a simpler interface is provided in dclone which carries out both operations. There is also a Clone module on CPAN.