Need help on LWP::UserAgent module!

spring · Nov 13, 2000

I use the following to tell the validation of a url.
Why I get 500 error, while the URL can be open correctly?
Any suggestion on validate a URL?

Following is my code:
#!c:/perl/bin -w
use LWP::UserAgent;

print "Content-type: text/html\n\n";

$ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(Get => "

http://www.mytophome.com/cgi-bin/gzhome/public/index.jsp");

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

# Check the outcome of the response
if ($res->is_success) {
print "<html><head><title>URL Test</title></head>\n";
print "<body>\n";
print "<h2>Congratuation!</h2><hr>\n";
print "<p>The URL '$url' is valid!</p>\n";
print "<p align=center><a href='javascript:window.close()'>Close Window</a></p>\n";
print "</body></html>\n";
} else {
print "<html><head><title>URL Test</title></head>\n";
print "<body>\n";
print "<h2>Not so luck today!</h2><hr>\n";
print "<p>The URL 'url' is invalid!</p>\n";
print "The error code is :";
print $res->code;
print "<br>\nThe error message is :";
print $res->message;
print "<br>\nThe error content is :";
print $res->content;
print "<p align=center><a href='javascript:window.close()'>Close Window</a></p>\n";
print "</body></html>\n";
}

Please note that the URL

http://www.mytophome.com/cgi-bin/gzhome/public/index.jsp

can be visited finely.
Wish your help!

goBoating · Nov 14, 2000

500 ERROR usually indicates a failure of the CGI code to execute successfully. Have you tried checking the syntax of your code, like......

Code:

prompt>perl -c yourProgramName.pl

That will complain if your code has syntax errors and give some hints as to where to look.

'hope this helps....

keep the rudder amid ship and beware the odd typo

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Need help on LWP::UserAgent module!

spring

Programmer

goBoating

Programmer

Similar threads

Part and Inventory Search

Sponsor