Select Code to Download

my %option;
@option{qw/a b c/}=();
...
exists $option{a} and print 'true';

exists $option{d} or print 'false';