Select Code to Download

my @items = qw(muthuma corion foo);

...
my $packed = pack $template, @ARGV;

print ">>$_<<" for unpack $template, $packed;