connecting to an external site using perl via proxy server

[IMAUser]

#!/sbcimp/run/pd/perl/5.6.1/bin/perl

use lib '/sbcimp/run/pd/cpan/5.6.1-2001.06/lib';

use LWP;
use HTTP::Request;
use URI;

$ua = LWP::UserAgent->new;
$ua->proxy('http' => '

http://myproxy:8080');

$req = HTTP::Request->new('GET','

http://www.google.com');

$req->proxy_authorization_basic('my_username', 'my_password');

$res = $ua->request($req);

print $res->content if $res->is_success;


How can I see if that script runs successfully or fails. And if it fails , how can I find if the error is at the proxy level or somewhere else.

TIA

 

[max1x]

You can use eval { }print $@; --> to check for errors || chk ur server log.

 

[max1x]

More information can be attained @:

http://perldoc.perl.org/functions/eval.html