...
my $a = WWW::Mechanize->new();
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' => $m1_string,
            	'm2' => $m2_string,
            	'm1DP' => '02',
            	'm1DO' => '02',
            	'm2DP' => '02',
            	'm2DO' => '02',
        }
);
....