RosettaCodeData/Task/Loops-Do-while/Raku/loops-do-while-2.raku

5 lines
57 B
Raku

my $val = 0;
repeat {
say ++$val;
} until $val %% 6;