Perl 6 Perl 6 series operator #10

Chained series

say ~(1,2,3 ...  10,20,30
            ...  100,200,300 
            ...  1000)

# 1 2 3 4 5 6 7 8 9 10 20 30 40
# 50 60 70 80 90 100 200 300 400
# 500 600 700 800 900 1000
Copyright © 2010
http://www.pmichaud.com/2010/pres/