>perl -wle"${\"} = eval qq[\"$ARGV[0]\"]; my @a = 1 .. 10; print \"@a\"" \t
1       2       3       4       5       6       7       8       9       10