#!C:/Perl/bin/perl.exe

use LWP::UserAgent;
$UserAgent = LWP::UserAgent->new;

my $request = HTTP::Request->new(POST => 'http://www.ogame105.de/game/flotten1.php?session=e679b283afa6'); #Das Formular
$request->content_type('application/x-www-form-urlencoded');
$request->content('maxship210=3&consumption210=1&speed210=160000000&capacity210=5&ship210=1'); #Die Paramter

my $response = $UserAgent->request($request);  #Request
print $response->as_string; #Wenn ich das richtig verstehe wird hier die Antwort geprintet???
print "\nFertig!"; #Bestätigung
<>;