my @values = ("GB","IE","CH");
$mech->select( $name, \@values  );