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

Re^4: GD and LWP giving 500 errors

by Schmunzie (Sexton)
on Mar 17, 2017 at 11:10 UTC ( #1185009=note: print w/replies, xml ) Need Help??

in reply to Re^3: GD and LWP giving 500 errors
in thread GD and LWP giving 500 errors

Thank you. This has proved extremely useful. I've been able to replace a swathe of LWP code with
$result=qx(curl -X POST --data "$query" ' +n/webscr');
and it seems to work.

The bit that is now confusing me is how to replace LWP's

is_error(status) and is_success(status)

There is barely a mention of response codes in the curl documentation.


Thanks to a search of StackOverflow, I now have a working workaround that give me access to the response code

read (STDIN, $query, $ENV{'CONTENT_LENGTH'}); $query .= '&cmd=_notify-validate'; my ($head,$body) = split( m{\r?\n\r?\n}, qx(curl -X POST --data "$que +ry" -si ''),2 ); my ($code) = $head =~m{\A\S+ (\d+)};

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (5)
As of 2020-08-11 07:22 GMT
Find Nodes?
    Voting Booth?
    Which rocket would you take to Mars?

    Results (58 votes). Check out past polls.