Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

libwww-perl fails

by arthurg (Acolyte)
on Nov 03, 2011 at 02:42 UTC ( #935560=perlquestion: print w/replies, xml ) Need Help??
arthurg has asked for the wisdom of the Perl Monks concerning the following question:

running this program:
#!/usr/bin/perl use strict; use warnings; use Data::Dumper; require LWP::UserAgent; my $ua = LWP::UserAgent->new; my $response = $ua->get(''); print Dumper $response; if ($response->is_success) { print $response->decoded_content; }
generates this output
$VAR1 = bless( { '_protocol' => 'HTTP/1.1', '_content' => '', '_rc' => '200', '_headers' => bless( { 'connection' => 'close', 'client-response-num' => 1, 'last-modified' => 'Wed, 02 Nov 2011 17:44:19 GMT', 'cache-control' => 'max-age=3599', 'date' => 'Wed, 02 Nov 2011 17:44:19 GMT', 'client-peer' => '', 'content-length' => '5752', 'age' => '8', 'client-aborted' => 'die', 'client-date' => 'Wed, 02 Nov 2011 19:18:15 GMT', 'x-died' => 'Can\'t load \'/opt/local/lib/perl5/site_perl/5. +8.9/darwin-2level//auto/HTML/Parser/Parser.bundle\' for module HTML:: +Parser: dlopen(/opt/local/lib/perl5/site_perl/5.8.9/darwin-2level//au +to/HTML/Parser/Parser.bundle, 1): Symbol not found: _PL_curpad Referenced from: /opt/local/lib/perl5/site_perl/5.8.9/darwin-2level// +auto/HTML/Parser/Parser.bundle Expected in: dynamic lookup at /opt/local/lib/perl5/site_perl/5.8.9/darwin-2level//HTML/ + line 17 Compilation failed in require at /opt/local/lib/perl5/site_perl/5.8.9/ +darwin-2level//HTML/ line 152. Compilation failed in require at /opt/local/lib/perl5/site_perl/5.8.9/ +darwin-2level//HTML/ line 85. BEGIN failed--compilation aborted at /opt/local/lib/perl5/site_perl/5. +8.9/darwin-2level//HTML/ line 85. Compilation failed in require at /opt/local/lib/perl5/site_perl/5.8.9/ +LWP/ line 638.', 'content-type' => 'text/html', 'server' => 'Plack/Starman (Perl)', 'expires' => 'Wed, 02 Nov 2011 18:44:19 GMT' }, 'HTTP::Headers' ), '_msg' => 'OK', 'default_add_content' => 1, '_request' => bless( { '_content' => '', '_uri' => bless( do{\(my $o = '')}, ' +URI::http' ), '_headers' => bless( { 'user-agent' => 'libwww-perl/6.03' }, 'HTTP::Headers' ), '_method' => 'GET', '_uri_canonical' => $VAR1->{'_request'}{'_uri'} }, 'HTTP::Request' ) }, 'HTTP::Response' ); Use of uninitialized value in print at ./ line 13.
perl: v5.8.9 built for darwin-2level
os: Darwin 10.8.0 Darwin Kernel Version 10.8.0: Tue Jun 7 16:33:36 PDT 2011; root:xnu-1504.15.3~1/RELEASE_I386 i386
cpan says:
LWP::UserAgent is up to date (6.03).

Replies are listed 'Best First'.
Re: libwww-perl fails
by Anonymous Monk on Nov 03, 2011 at 02:58 UTC

      thanks, yeah, I'm doing some forced installs now.

      obviously, whether libwww-perl failed or not, depends on your definition of "fail" and "obviously".

      but a non-programmer, not privy to special definitions of "fail" and "obviously", would look at this and say "it didn't work, that is, it failed".


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://935560]
Approved by Corion
[Corion]: Cool. Google makes it easier for me to wean myself off Google Keep. The app now insists on saving items online before displaying them in the offline view.
[Corion]: I should maybe set up a "public" instance of my clone just to manage feature suggestions ;)

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (12)
As of 2017-04-25 11:50 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (450 votes). Check out past polls.