Community  »  CGI: Allgemeines Forum

Auto Login auf fremder Website.	Seitenanfang
Hallo, ich möchte gerne mich an einer Website (login.php) per script automatisch anmelden. Soll heissen, ich habe eine Seite http://bla.de/login.php dort ist ein Form mit username, passwort und Anmelden Button. Die Geschichte mit http://bla.de/login.php?....=.... funktioniert nicht da ein POST erwartet wird und kein GET. Nach der Anmeldung wird ein session key generiert und man wird auf die Hauptseite geleitet. Ich habe einen Proxyserver zur Verfügung, auf dem ich das Script voran setzen könnte. Sozusagen, man surft auf eine interne URL ... diese meldet einen an und man gelangt automatisch angemeldet auf die Hauptseite. Ideen ? Datum: 08.08.2007-13:57
re: Auto Login auf fremder Website.	Seitenanfang
Mit LWP::UserAgent lassen sich auch HTTP-POST-Request absetzen, es gibt aber speziell fuer den automatisieren Zugriff auf Webseiten das Modul WWW::Mechanize (http://search.cpan.org/~petdance/WWW-Mechanize/). Datum: 08.08.2007-20:40
re: Auto Login auf fremder Website.	Seitenanfang
Ich habe es nun so gelöst: package MCF::login; use strict; use Apache::RequestRec (); use LWP; use LWP::UserAgent; my $response = ""; sub handler { my $r = shift; $r->content_type('text/html'); $r->rflush; # send the headers out my $ua = new LWP::UserAgent; push @{ $ua->requests_redirectable }, 'POST'; $response = $ua->get("http://bla.de/logincontrol/login.php"); $response->is_success or print STDERR "Fehler line 94: ", $response->message, "\n" and die; $response = $ua->post("http://bla.de/logincontrol/login.php", [username => xxxxx, passwort => xxxxx, action => 'Anmelden' ]); $response->is_success or print STDERR "Fehler line 111: ",$response->message, "\n" and die; $r->print("<meta http-equiv='refresh' content='1;URL=http://bla.de/frameset_closed.php'>" ); return Apache::OK; } 1; Datum: 09.08.2007-08:08