my %opts;
GetOptions(map { ($_ => \$opts{$_}) } "a".."z");

$opts{$_} and print "$_ was selected\n" for "a".."z";