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