Select Code to Download

  foreach my $req (@$reqs) {
    print "Registering '".$req->url."'\n";
...
  foreach (keys %$entries) {
    my $res = $entries->{$_}->response;
  }

undef %entries # or
%entries=();