Ich bin ein bisschen neu in der Programmierung und habe Probleme beim Schreiben eines Perl-Skripts, mit dem alle Bilder von einer Webseite abgerufen und in einem angegebenen Verzeichnis gespeichert werden.

Hier ist mein Code:

use warnings;
use strict;
use lib '/home/User1/strawberry/cpan/build';
use Image::Grab;

$pic = Image::Grab->new(SEARCH_URL=>'http://www.examplesite.com',
                          REGEXP    =>'.*\.gif|.*\.jpg');
my $dir = 'images';

opendir (IMG, ">>$dir") || die "Directory doesn't exist - $!\n";
foreach ($pic) {
        print IMG "$_\n";
}
closedir IMG;

Dies ist der Fehler, den ich bekomme, wenn ich das Skript in PuTTY ausführe:

Image / Grab.pm kann in @INC nicht gefunden werden (@INC enthält: / home / User1 / strawberry / cpan / build / etc / perl /usr/local/lib/perl/5.10.1 / usr / local / share) /perl/5.10.1 / usr / lib / perl5 / usr / share / perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 / usr / local / lib / site_perl.) in getimage.pl Zeile 7 BEGIN fehlgeschlagen - Kompilierung in Zeile 7 von getimage.pl abgebrochen.

Danke für die Hilf