sub isprime {$_[0] =~ /^[2357]$/}