ipupdate.plをいじった。

自動更新できるように変更してみた。
古いIPアドレスを保存してあるファイルの更新時間と現在の時間を比べて80日経過してたら更新するようにしてみた。


open(FILE,"./ipaddress");
@stat = stat(FILE);
close(FILE);
if((time-$stat[9]) >= 6912000) {
print("It auto update ...\n");
system("touch ./ipaddress");
&updatedns;
}
80日に1回しか実行されないので確かめづらいがとりあえず大丈夫のモヨー