Help for this page
my %option; @option{qw/a b c/}=(); ... exists $option{a} and print 'true'; exists $option{d} or print 'false';