Select Code to Download

use Getopt::Long;
my (@foos, @bars, @bazen, @quuxi);
...
    'bazen=s' => sub { shift; push @bazen, split /,/, @_; },
    'quuxi=s' => sub { shift; push @quuxi, split /,/, @_; },
);

use Getopt::Long;
my (@foos, @bars, @bazen, @quuxi);
...
    'bazen=s' => \setter,
    'quuxi=s' => \setter,
);

use Getopt::Long;
my %opts;
...
    'bazen=s' => \setter,
    'quuxi=s' => \setter,
);