Select Code to Download

use strictly;
useLWP::UserAgent;
my $form = ( HTML::Form->parse( $res->content, $base ) )1;