use strict;
use warnings;
use WWW::Mechanize::Firefox;

my $mech = WWW::Mechanize::Firefox->new();

   $mech->get('http://google.com/');

   $mech->form_id( 'search' ); # hier soll jetzt die eingabe/such-begriff rein

   #$mech->click_button( id => 'submitButton' ); #das klappt