[Boulder.pm] LWP::UserAgent question
Walter Pienciak
wpiencia at thunderdome.ieee.org
Wed Jul 20 14:08:13 PDT 2005
On Wed, Jul 20, 2005 at 08:56:02PM +0000, Jason Van Slyke wrote:
>
> Hi all,
>
> We have a Perl program that runs on a RH Linux 2.1 Advanced Server
> machine that resides behind a firewall. About 99.9% of what it does is
> within that firewall...except for two of my applications (lucky me
> ;'). The appl that uses FTP works fine, but a test script to set the
> http proxy URL is as follows:
>
> #!/usr/bin/perl -w
> use diagnostics;
> use strict ;
> use LWP::UserAgent;
> # intialize proxy setting - this is not working, 29Apr05, jvs
> my $ua = LWP::UserAgent->new
> or die "Can't initialize LWP::UserAgent->new: \$!=$!\n";
> $ua->proxy(http => 'http://ttt.ww.xxx.yyy:8080/')
> or die "(object method call) Can't set http to proxy server:
> \$!=$!\n";
>
> Whether run by me or by *root* the result is:
>
> Uncaught exception from user code:
> (object method call) Can't set http to proxy server: $!=
> Sometimes, but not in all cases as the example shows, $!=Illegal seek
>
> I have been on 4 conference calls with the a server engineer and a
> firewall engineer and they are telling me that the proxy server never
> hears from my server during our tests.
>
> Please tell me that I'm not the only Perl hacker to get caught in this
> web of mystery. Any ideas are welcome.
>
> thx, Jason
>
> PS: Anybody had enough time to read some (or all I guess) of Perl Best
> Practices? What did you think of it? My copy showed up Monday and I've
> only read about 10 pages; sounds interesting though.
Jason,
I haven't had to wrestle with this, but I do wonder if
use LWP::Debug qw(+)
would give you anything interesting.
Walter
More information about the Boulder-pm
mailing list