Select Code to Download

use Data::Dump;
my @argv = qw/ foo --job X --job Y --job Z /;
...
dd $args, $job;
__END__
("foo ", "X ")

use Data::Dump;
my @argv = ('--hello','world --job foo','--job','bar');
...
dd $args, $job;
__END__
("--hello world ", "foo ")