for my $element (@primes) {
    last if $element > $n;
    $answer .= " $element";
    }