LWP::Simple, getstore (or mirror) not working.

sbrothy has asked for the wisdom of the Perl Monks concerning the following question:

I want to grab an image off of wiki; I know the URL works as I can test it in my browser, but if I try the following, I get HTTP 400 Bad Request.

#!/usr/bin/perl

use strict;
use warnings;
#use autodie;
#use diagnostics;

use LWP::Simple;

print getstore("/upload.wikimedia.org/wikipedia/commons/thumb/f/fa/Fla
+g_of_the_People%27s_Republic_of_China.svg/23px-Flag_of_the_People%27s
+_Republic_of_China.svg.png", "23px-Flag_of_the_People%27s_Republic_of
+_China.svg.png");
[download]

Output:

Can't locate LWP/Simple.pm in @INC (@INC contains: /usr/lib/perl5/5.8.
+0/i486-linux /usr/lib/perl5/5.8.0 /usr/lib/perl5/site_perl/5.8.0/i486
+-linux /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl .) at 
+line 8.
BEGIN failed--compilation aborted at line 8.
[download]

Comment on LWP::Simple, getstore (or mirror) not working. Select or Download Code

Replies are listed 'Best First'.
Re: LWP::Simple, getstore (or mirror) not working. by Corion (Patriarch) on Mar 31, 2019 at 09:24 UTC
The error message on that weirdo site is: `Can't locate LWP/Simple.pm in @INC ( ...` [download] If that's intentional, then you will need to install LWP::Simple. If that message is an artefact of that weirdo site you are linking to, please instead paste the real code with the real error message here. Looking at the code you pasted there, the URL you try to be using is not a proper `http` URL: `... print getstore("/upload.wikimedia.org/..."); ...` [download] Try a proper URL like `print getstore("http://upload.wikimedia.org/...");` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: LWP::Simple, getstore (or mirror) not working.
by Corion (Patriarch) on Mar 31, 2019 at 09:24 UTC

The error message on that weirdo site is:

Can't locate LWP/Simple.pm in @INC ( ...
[download]

If that's intentional, then you will need to install LWP::Simple.

If that message is an artefact of that weirdo site you are linking to, please instead paste the real code with the real error message here.

Looking at the code you pasted there, the URL you try to be using is not a proper http URL:

...
print getstore("/upload.wikimedia.org/...");
...
[download]

Try a proper URL like

print getstore("http://upload.wikimedia.org/...");
[download]

[reply]
[d/l]
[select]

Back to Seekers of Perl Wisdom