come to know that pp support -E :)

pp -E 'my @purl = (2); say for 2, grep { my $c = $_; eval { $c % $_ or return undef for @purl; qq(prime) } and push @purl, $c } 3..$ARGV[0]' -o bin/prime