eval { $mech->get($url_login); $mech->form_number($form_nummer); $mech->field('username' => $username); $mech->field('password' => $password); $mech->click(); 1; } or warn "some call failed: $@";