#!/usr/bin/perl

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

# mechanize-Objekt erstellen, Damit arbeiten wir.
my $mech = WWW::Mechanize->new();

# Adresse der Webseite mit dem Formular, das du ausfüllen willst.
my $url = 'http://www.secured-site.com';

# Webseite mittels GET-Request (einfach mal danach googeln) auslesen
$mech->get( $url );

# das Login-Formular auswählen (über die ID)
my $name = "is_des_formulars";
$mech->form_id( $name );

# Formular mit deinen zugangsdaten abschicken
$mech->submit_form(
    form_number => 3,
    fields      => {
        username    => 'mungo',
        password    => 'lost-and-alone',
    }
);