$ perl -MPDL -le '$arr = sequence(10); print $arr' [0 1 2 3 4 5 6 7 8 9]