use vars qw /%option/;

getopt('m:f:l:s:q:h', \%option);