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

4 lines
86 B
Raku

my $answer;
repeat {
$answer = prompt "Gimme an answer: ";
} until $answer ~~ 42;