Help for this page

Select Code to Download

Select or download this

use CGI ':standard';
use HTTP::Request;
use LWP::Simple qw/get/;
$url = 'https://10.204.16.17:16316/ibm/console/login.do?action=secure'
+;
`wget $url`;

Select or download this

#!/usr/bin/perl
use LWP::UserAgent ;
...
print "Error:$URL\n";
print $response->error_as_HTML;
}