##

my $url = 'http:/app/correct/path/form_machine.htm' ;
my $mech = WWW::Mechanize->new();
$mech->get( $url ) ;

my $machine = 'SYSID' ; 

$mech->form_name('form_machine') ;
$mech->field( 'machine', $machine ) ;
$mech -> click('IwantThisOne') ; 

##

##

No clickable input with name IwantThisOne