功能:当Linux磁盘分区达到70%时,自动发送邮件报警,使用前提:在被监控服务器上开启sendmail即可。 #!/usr/bin/perl $ip_addr=`/sbin/ifconfig eth0 | perl -lne 'print \$1 if/inet addr:(.*)Bcast/'`; $ip_addr=~ s/^\s+|\s+$//g; $admin_addr = 'yo
#!/usr/bin/perl use strict; use warnings; use Net::SSH::Expect; use String::MkPasswd qw(mkpasswd); my $user = "user"; my $pass = 123456; my $root_pass = 123456; my
Copyright © 2005-2024 51CTO.COM 版权所有 京ICP证060544号