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

##</code><code>##

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

##</code><code>##

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;'