perl -e '$x = \((0..3)); print @$x' 0123