Select Code to Download

[0] Perl> print join ' ', map $_^14, 0..15;;
14 15 12 13 10 11 8 9 6 7 4 5 2 3 0 1

[0] Perl> print join ' ', map $_^8, 0..15;;
8 9 10 11 12 13 14 15 0 1 2 3 4 5 6 7

[0] Perl> print join ' ', map $_^8, 0..31;;
8 9 10 11 12 13 14 15 0 1 2 3 4 5 6 7 24 25 26 27 28 29 30 31 16 17 18
+ 19 20 21 22 23
...

[0] Perl> print join ' ', map $_^30, 0..31;;
30 31 28 29 26 27 24 25 22 23 20 21 18 19 16 17 14 15 12 13 10 11 8 9 
+6 7 4 5 2 3 0 1

[0] Perl> print join ' ', map $_^10, 0..19;;
10 11 8 9 14 15 12 13 2 3 0 1 6 7 4 5 26 27 24 25