Select Code to Download

    my $acceptsock    = $sock->accept;
...
      }
    }

  my ($readsocks, $writesocks, $errsocks) = 
    IO::Select::select($select, $select, $select);