Greetings fellow monks!

Usually I code as much as possible on my own. So when I want to do something automatic on a webpage I usually loaded that page with curl and fetched the data I needed with a bunch of REs.

But the lessons in th monastry sunk in and so I started the adventure of WWW::Mechanize, when I felt the need to automatically retrieve some data from my account at Nintendo.

But I failed miserably! Analyzing the web traffic revealed that a login using Mozilla sends different data than a login tried with my script.

Maybe a WWW::Mechanize expert can find out what I'm doing wrong or what I'm missing.

Here is my script with personal data X-ed

#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;

my $user= 'XXXX@spamgourmet.com';
my $password= 'XXXX';

my $n=WWW::Mechanize->new();
$n->get( q(http://www.nintendo-europe.com/NOE/de/DE/logout/index.jsp?D
+PSLogout=true) );
$n->form_name('login');
$n->set_visible( $user, $password );
$n->submit_form( x => 3, y => 7);
print $n->content()
[download]