or download this
[jeroen@rulffk] perl -e 'print join(", ",(1 3 6 2));'
Number found where operator expected at -e line 1, near "1 3"
...
Number found where operator expected at -e line 1, near "6 2"
(Missing operator before 2?)
Execution of -e aborted due to compilation errors.