Re: google-image.pl

[Christian Brabandt <dug@256bit.org>]

Hallo Klaus!

Klaus Becker schrieb am Montag, den 23. Juni 2008:

> $ google-image.pl --limit 20 "..."
> Unknown argument: --limit 20 ...
> 
> "..." ist natürlich nur ein Platzhalter für einen Suchbegriff

Schon klar. Ich meinte auch explizit ein Beispiel.
> 
> Ein anderes Beispiel:
> 
> $ google-image.pl "debian"
> Unknown argument: debian

Also ich hab jetzt extra Mal das Script installiert, inklusive der 
abhängigen Module. Bei mir funktioniert es einwandfrei.
Da ist wohl irgendwas bei Dir kaputt. Funktioniert denn das folgende 
simplere Skript?

,----
| #!/usr/bin/perl
| use strict;
| use warnings;
| use utf8;
| 
| use WWW::Google::Images;
| 
| my $agent = WWW::Google::Images->new(
|     server => 'images.google.com',
| );
| 
| foreach (@ARGV) {
|     my $result = $agent->search($_, limit => 20);
|     while ( my $image = $result->next()) {
|         print $image->content_url() . "\n";
|     }
| }
`----

> $ google-image.pl "debian" | xargs wget
> Unknown argument: debian
> wget: URL fehlt

Das ist kein Problem von wget, sondern deinem Script.
Die Cpan Module

open 
Log::Log4perl 
Getopt::Euclid
WWW::Google::Images
LWP::Simple
File::Basename

sind alle installiert?


Grüße
Christian
-- 
hundred-and-one symptoms of being an internet addict:
191. You rate eating establishments not by the quality of the food,
     but by the availability of electrical outlets for your PowerBook.