RosettaCodeData/Task/Inverted-syntax/Perl-6/inverted-syntax-2.pl6
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

8 lines
157 B
Raku

while $i { --$i }
--$i while $i;
until $x > 10 { $x++ }
$x++ until $x > 10;
for 1..10 { .say if $_ %% 2 }
.say if $_ %% 2 for 1..10; # list comprehension