Select Code to Download

my @getoptions_args = keys %test;
my %opts = map { (my $o = $_) =~ s/[=:|\!].*$//; $o => $test{$_} } @ge
+toptions_args;
GetOptions(\%opts, @getoptions_args);
%test = %opts;

$cmdlineparser->accept(
  'option1=s' => {
...
     help => 'Option1 does blah blah blah fooseball',
   },
);