Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re^4: Checking for undef after performing get()

by sawtooth (Initiate)
on Jan 11, 2006 at 16:21 UTC ( #522481=note: print w/ replies, xml ) Need Help??

in reply to Re^3: Checking for undef after performing get()
in thread Checking for undef after performing get()

Yes, LWP::UserAgent was the ticket. This was the ideal solution that I was seeking:

my $ua = LWP::UserAgent->new; my $response = $ua->get($url); if ($response->is_success){ (good things happen) } else { my $failmsg= ($response->status_line); (print the $failmsg) return; }
BUT, for this to work, the web based script, after being triggered by the get(), must return some response that is part of the HTTP protocol. I added this line to the top of the web based script:
print "Content-type: text/html\n\n";
Otherwise you receive a 500 Internal Server Error. Thanks again for the help!

Comment on Re^4: Checking for undef after performing get()
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://522481]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (7)
As of 2016-02-06 23:32 GMT
Find Nodes?
    Voting Booth?

    How many photographs, souvenirs, artworks, trophies or other decorative objects are displayed in your home?

    Results (238 votes), past polls