nicht angemeldet
externe Seite auslesen (inkl. Senden von POST)
Hallo
Ich versuche eine externe Seite (keine Copyr. Verletzung, es handelt sich um eine Releaseliste für Videogames direkt vom Hersteller) auszulesen.
Das Ganze geht problemlos mit LWP:Simple.
Der Hacken ist aber:
Damit ich auch die zweite Seite angezeigt bekomme, wird im Browser über ein Formular mittels POST der Wert "pagenr=2" an den Server gesendet.
Kann ich das auch über Perl machen? Wenn ja, wie mach ich das? Bin selbst nach 30 min extrem-googling nicht fündig geworden ;)
Danke für die Hilfe
Gruss
Jonas
-
Hallo,
Kann ich das auch über Perl machen? Wenn ja, wie mach ich das? Bin selbst nach 30 min extrem-googling nicht fündig geworden ;)
http://search.cpan.org/~gaas/libwww-perl-5.803/lwpcook.pod sollte helfen.
Grüße
Klaus-
Hmmm
Habe mal das simple Beispiel kopiert:
use LWP::UserAgent;
$ua = LWP::UserAgent->new;my $req = HTTP::Request->new(POST => 'http://www.perl.com/cgi-bin/BugGlimpse');
$req->content_type('application/x-www-form-urlencoded');
$req->content('match=www&errors=0');my $res = $ua->request($req);
print $res->as_string;Leider bekomme ich immer einen 500 Internal Server Error. Woran kann das liegen?
-
你好 Jonas,
[...]
my $res = $ua->request($req);
print $res->as_string;Leider bekomme ich immer einen 500 Internal Server Error. Woran kann das
liegen?print "Content-Type: text/html\015\012\015\012"; fehlt ;-)
再见,
CK-
Hi
THX! Das wars ;)
-
-
-
-
你好 Jonas,
Damit ich auch die zweite Seite angezeigt bekomme, wird im Browser über
ein Formular mittels POST der Wert "pagenr=2" an den Server gesendet.Kann ich das auch über Perl machen? Wenn ja, wie mach ich das? Bin
selbst nach 30 min extrem-googling nicht fündig geworden ;)30 Minuten? Das glaube ich dir erstens nicht und zweitens habe ich auch
schonmal einige Tage nach einer Loesung gegoogelt ;-)Whatever, du suchst LWP::UserAgent. Auf perldoc.com findest du
Dokumentation dazu, leider ist der Server bei mir gerad nicht erreichbar.再见,
CK