print "hello perl6 world\n"; my int @list1 = ( 1 .. 10 ); my int @list2 = @list1 ^* 2; my int $i = 0; for @list1; @list2 -> $a; $b { print "list iteration " _ ++$i _ ": a is " _ $a _ "; b is " _ $b _ "\n"; }