@primes = grep { is_prime($_) } @numbers;