Select Code to Download

my $new_sock = $sock->accept();
while (my $storage = <$new_sock>) {
...
    $new_sock = $sock->accept();
}
close($sock);