RosettaCodeData/Task/Inverted-syntax/Perl-6/inverted-syntax-7.pl6

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