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