perldoc -q "How do I check a valid mail address?"