Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

(wil) Re: seeing what is going on in form posts

by wil (Priest)
on Jun 26, 2002 at 09:11 UTC ( [id://177337]=note: print w/replies, xml ) Need Help??


in reply to seeing what is going on in form posts

I want to see the environment variables when I do a manual login to their site and when I try my own post from an LWP script.

What exact %ENV variables do you want to know from the remote server? What exactly are you trying to figure out?

As others have noted, there is no way to do this using the code or method you referenced in your message. However, there are a few dirty workarounds that might work on some servers to get some or very limited information.

LWP::UserAgent could well be of some use to you here. Specifically, you might be interested in a few of it's functions, the most useful might be $ua->is_protocol_supported($scheme).

Here's some code snippet that might also be of use in determining the Server: header field returned. Again, this is a dirty hack, and is likely to break or not work at all.

#!/usr/bin/perl use strict; use LWP::UserAgent; my $ua = new LWP::UserAgent; my $req = new HTTP::Request 'HEAD' => 'http://localhost'; $req->header('Accept' => 'text/html'); my $sex_is_good = $ua->request($req); unless (!$sex_is_good->is_success) { print $sex_is_good->as_string; }

Hope this helps!

- wil

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2024-04-26 01:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found