• # Perl et Mech

    Posté par . En réponse au message Comment faire pour remplir automatiquement un formulaire web. Évalué à 10. Dernière modification le 02 avril 2013 à 23:57.

    Je te propose Mech, alias WWW::Mechanize, qui correspond à tes besoins.

    Par exemple, un simple script pour se connecter à un FreeWifi (lancé automagiquement par mon gestionnaire de connexion). Il devrait t'être très facile de l'adapter.

    #!/usr/bin/perl
    use strict;
    use WWW::Mechanize;
    my $bot = WWW::Mechanize->new(
     agent => 'Mozilla/5.0 (X11; U; Linux i686; fr; rv:1.9.0.6) Gecko/2009020619 Gentoo Iceweasel/3.0.6 '
     );
    $bot->get('https://wifi.free.fr/');
    $bot->form_name('form1');
    $bot->field( login => 'mon_login' );
    $bot->field( password => 'mon_pass' );
    $bot->submit();
    
    

    Explications :

    1. Je démarre une instance de Mech (nommée $bot).
    2. Je charge la page.
    3. Je selectionne le formulaire (via son nom, mais il existe d'autre methode pour le selectionner via son ordre dans la page).
    4. Je rempli les champs login et password.
    5. J'envoi.

    Roulez jeunesse.