if ($sender =~ /\@.*\@|,|\..*\..*\.|\n/i) {