Aus StudiWiki

[bearbeiten] Chrom-Spoiler-Variante

(Für Perl-Monks und solche, die mech jetzt erst cool finden. ;)
Kleines script, um die gwlaptop-Anmeldung zu automatisieren. Einfach (automatisch) nach dem Erhalt der IP via DHCP ausführen:

#!/usr/bin/perl

### $Id:$
### Last checkout: $Date:$
### Created: mar 2006-11-07, 17:15:48 CET (+0100) Nils.Radtke_@_Think-Future.de
### Last modified: mar 2006-11-07, 18:19:33 CET (+0100) -> radtkens ###

use warnings;
use strict;
use WWW::Mechanize;

my $mech = WWW::Mechanize->new();

my $url = 'https://gwlaptop.informatik.uni-stuttgart.de/index.cgi';
$mech->get($url);

my @forms = $mech->forms;
if (@forms >= 1)
{
 $mech->submit_form(
       form_number => 1,
       fields    => {
           thelogin => 'mememe',
           thepassword => 'minenotyours',
           action => 'login'
         },
     );
}

### EOF 
### vim:tw=256:et:sts=2:st=2:sw=2:com+=b\:###:fo+=cqtr:tags=ctags:

WWW::Mechanize muß installiert sein. Mit debian (oder einem der vielen Derivate):

apt-get install -t testing libwww-mechanize-perl

[bearbeiten] Die einfache Variante :-)

curl "https://gwlaptop.informatik.uni-stuttgart.de/index.cgi?action=login&thelogin=meinusername&thepassword=meinpasswort" >/dev/null 2>&1

Dazu muss curl-ssl installiert sein. apt-get ... naja, ihr kennt das Spielchen :-)

< Üblichen Disclaimer bzgl. dem unverschlüsselten Abspeichern von Passwörtern hier einfügen:-) >