Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Re: SOAP::Lite - Finding callers IP

by Pardus (Pilgrim)
on Jan 23, 2003 at 14:30 UTC ( [id://229316]=note: print w/replies, xml ) Need Help??


in reply to Re: SOAP::Lite - Finding callers IP
in thread SOAP::Lite - Finding callers IP

print_env.pl : 
print "Content-type: text/html\n\n";
print "<HTML> <HEAD><TITLE>Env</TITLE></HEAD> <BODY><TABLE>\n";
while (my ($k, $v) = each %ENV) {
    print "<TR><TD>$k</TD><TD> = $v</TD></TR>\n";
}
print "</TABLE></BODY></HTML>";

[download]

--
Jaap Karssenberg || Pardus (Larus)? <pardus@cpan.org>
>>>> Zoidberg: So many memories, so many strange fluids gushing out of patients' bodies.... <<<<

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://229316]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2024-04-19 20:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found