if ($email =~ /@/) ...