perl发送邮件脚本，一个简单的发生邮件的代码只有几行。