perl -e "map {print qq($_ ) unless $_ =~/(2|4|5|6|8|0)$/ } @ARGV" 2 3 5 7 11 13 17 19 23 29 37
3 7 11 13 17 19 23 29 37