使用 Perl 检测 系统进程，实现进程意外退出重启

最近 RedHat 系统中某个关键进程不知道啥米原因，或鸭梨过大。
总是无故挂掉。
于是写了这个小脚本，自动检测指定进程。
使用 ps -ef 获取内容，if + eq 判断
如果内容为空，则重新启动进程。
本脚本存为 xxx.pl 然后用 crontab 定时执行即可。
但脚本名字别取为 跟所需进程检测相同的名字。
例如检测 mysql 进程。
别把脚本名也设为 mysql_ck.pl 这一类的名字。
因为本身该脚本在运行中，也会有相应名字的进程，会被误判为 mysql。
这样脚本就认为 mysql 依旧执行，判别出错了。
代码中 sasl 就是所检测的某个程序，按照需要修改即可。

你都能把grep给grep掉， 也能把自己grep掉