Select Code to Download

   my $sock = Net::HTTP->new(Host => "server.com") || die $@;
   $sock->write_request(GET => "bytestream") or die $@;
...
                   # Argument "x" isn't numeric ...etc
                   #  where "x" is some crazy character
   }