http://qs321.pair.com?node_id=177337


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