my $a = WWW::Mechanize->new();
$a->agent_alias( 'Windows IE 6' );
my $url = "http://www2.germanwings.com/";    

$a->get( $url );
if ($a->success())
{
$a->submit_form
(
'form_name' => 'SBform', 
'fields'	=> 
{
	'mode'	=> 'FEUR',
	'pT' => '2ADULT0CHILD',
	'nom' => '2',
	'm1' => '20040510STRSXF',
	'm2' => '20040515SXFSTR',
	'm1DP' => '02',
	'm1DO' => '02',
	'm2DP' => '02',
	'm2DO' => '02',
	'm1DP' => '02',
	'm1DP' => '02',
}
);

my $inp = $a->content();
print $inp;
}