Select Code to Download

perl -we 'print "<<<$_>>>\n" for @ARGV;' -- "${NUMS[@]}"

printf "%s\0" "${NUMS[@]}" | perl -we 'my @NUMS; { local $/ = "\0"; ch
+omp(@NUMS = <STDIN>); }; warn "<<<$_>>>\n" for @NUMS; '

for k in "${!NUMS[@]}"; do export NUMS_$k=${NUMS[k]}; done;
perl -we 'my @NUMS; while (my($k, $v) = each %ENV) { $k =~ /\ANUMS_(.+
+)\z/ and $NUMS[$1] = $v; } print "<<<$_>>>\n" for @NUMS;'