Oray auto update dynamic ip script

自动更新花生壳(oray)动态IP脚本,以下仅为本人笔记,不做解释,请自行研究分析,将其放到crontab定时检测。

#!/usr/bin/perl
system("ps aux |grep phlinux > aaa");
open(AAA,"+<aaa");
$aaa=;
@bbb=split(' ',$aaa);
$ccc=$bbb[10];
$ddd="/usr/local/phlinux/phlinux";
if ( $ccc ne $ddd ) {
system("/sbin/ip route add 61.152.96.118/32 via 218.16.0.14");
system("/sbin/ip route add 61.152.96.119/32 via 218.16.0.14");
system("/usr/local/phlinux/phlinux -d");
close(AAA);
} else {
exit 1;
}