$url = "http://metexplore.toulouse.inra.fr/metexplore/index.php/2011-06-06-14-41-

10/choke-point-reactions";


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

$mech->get($url);
$value ="Bacillus anthracis (Strain: Ames Ancestor) MicroCyc";
#$mech->form_id('form');


$mech->field('org',$value);

#$mech->select('org', '?Bacillus anthracis(Strain:Ames Ancestor)MicroCyc');

$mech->set_fields('org'=>$value);

$mech->submit;