centos7 基于perl-Net：SMTP发送邮件通知

Perl 环境安装

大部分linux已经默认安装了perl，可以通过一下命来赖查看是否已安装：

# perl -v

如显示如下，表示已经安装。

如未安装，可使用一下命来进行安装：

#yum -y install perl-CPAN

#cpan NET::SMTP_auth

Perl 脚本编写

#vi sendmail.pl

保存：

#:wq

给编写好的脚本添加可执行权限：

#chmod +x sendmail.pl

执行：

#./sendmail.pl

结果：

扩展

可配合keepalived实现高可用。

现在搭建服务器，为了服务安全。一般情况下都会准备一台主机一台备用机，因为就可以使用keepalived实现高可用了。在主机宕机的情况下，可通过keepalived创建的vip，使原本连接到主机ip上，自动漂移到备用机的ip上。所以，在主机发送故障切换到备机上，可用过发送邮件的方式通知运维前来查看主机。

keepalived的安装与配置，下次有时间再跟大家分享！