use Getopt::xxx;
getopts('e:'; \%options);
if (ref $options{e} eq 'ARRAY'){
print 'you got e args with', $options{e}->@*;
}else {
print 'your e arg is ', $options{e}
}