Select Code to Download

print redirect("http://www.awebserver.com/cgi-bin/~whereyouneedtogo.pl
+?username=$un");

  sub char_handler {
        my ($expat, $text) =@_;
...
        }
   }