Seite 1 von 1
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:09
von sean
hab mal eben auf nem Win Rechner activeperl installiert. Nun will ich folgendes Script ausführen :
https://www.devshed.com/c/a/Perl/Web-Mi ... th-Perl/3/
Wie immer wenn man das zum ersten Mal macht, läuft es halt nicht. Das Script bricht in Line 9 (die "get failed" if (!defined $content);) ab, er hat also get($url); nicht ausführen können. Den Code versteh ich, aber nicht was ihm zur Ausführung fehlt.
Brauch ich noch weitere Module für perl? Was ist CPAN?
Gruß und Danke für eure Hilfe
sean
<edit>wird das Modul "libwww-Perl" sein, wie bekomme ich das eingebunden?</edit>
Verfasst:
von
Content Erstellung von
ABAKUS Internet Marketing
Ihre Vorteile:
- einzigartige Texte
- suchmaschinenoptimierte Inhalte
- eine sinnvolle Content-Strategie
- Beratung und Umsetzung
Jetzt anfragen:
0511 / 300325-0
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:11
von BSweet
use oder include LWP::Simple wars glaub
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:16
von sean
ja, das steht im Quelltext, aber wie bekomme ich die Komponente auf meinen PC eingebunden, sodass perl darauf zugreifen kann?
Gruß
sean
Re: activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:21
von /bin/false
sean hat geschrieben:ja, das steht im Quelltext, aber wie bekomme ich die Komponente auf meinen PC eingebunden, sodass perl darauf zugreifen kann?
Es reicht wenn du in den Ordner wo das Script liegt folgende Struktur
anlegst und dort die CPAN module reinpackst
LWP::Simple -> ./LWP/Simple.pm
HTML::LinkExtor -> ./HTML/LinkExtor.pm
ODER mit:
use lib "../../perl/";
angibts, wo der cpan startordner ist
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:37
von sean
@/bin/false
Danke, kannst Du mir mal den EXAKTEN Syntax schreiben? Wenn ich das so einbinde, bekomme ich nur Syntax Fehler. Auch wenn ich mit Gänsefüschen arbeite usw.
Gruß
sean
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:50
von sean
kann man bei "use lib "../../perl/"; " auch Laufwerksnamen angeben? Irgendwie haut das nicht hin und ich find bei G. nix.
Gruß
sean
Re: activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 12:59
von /bin/false
sean hat geschrieben:@/bin/false
Danke, kannst Du mir mal den EXAKTEN Syntax schreiben? Wenn ich das so einbinde, bekomme ich nur Syntax Fehler. Auch wenn ich mit Gänsefüschen arbeite usw.
Ok, mal einen kompletten aufbau.
Mit kompletten Laufwerksangaben hab ich keine Erfahrungen, weil noch
nicht probiert, denke aber, so einfach wie bei php ist das nicht, ergo
würde ich es auch nicht probieren
Code: Alles auswählen
#!/usr/bin/perl -w
use lib "../../perl/";
# die vars.pl kann jetzt unter "../../perl/vars.pl" liegen
require "vars.pl";
#use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
# liegt unter "../../perl/LWP/Simple.pm"
use LWP::Simple;
# liegt unter "../../perl/HTML/LinkExtor.pm"
use HTML::LinkExtor;
# DAS IST das wichtigste :)
print "Content-type: text/html\n\n";
print "Hallo Welt\n";
Und dann natürlich den /usr/bin/perl ändern ...
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 13:01
von sean
also et läuft jetzt
Zumindest kommen keine Fehler mehr, aber die URL ruft das Script nicht auf. An der Firewall kommt auch nichts an
Ich habs wiefolgt gemacht:
#!/usr/bin/Perl
use lib "f:\perl\html\lib";
use LWP::Simple;
use HTML::Parser;
use Data::Dumper;
my $url = shift @ARGV;
die "No URL specified on command line." unless (defined $url);
my $content = get($url); #put site html in $content.
die "get failed" if (!defined $content);
.......
nur kann er anscheinend get($url) nicht ausführen. Was kann das sein?
Gruß
sean
activeperl auf windows - brauche hilfe
Verfasst: 22.10.2005, 13:38
von sean
et lüppt! Einer Domain sollteich auch ein Protokollhinweis geben (http)
Gruß und Danke
sean
