perl パール pearl ― 2017年03月02日
linux ネタついでに、perl ネタ。（笑
わかるかな〜？わかんねぇだろうなぁ。
奥様、明日は卒業式に出席だそうで、パール三昧のテスト。
これに、パールの指輪をプラス。どうよ！（笑
期間限定写真は削除しました。
わかるかな〜？わかんねぇだろうなぁ。
奥様、明日は卒業式に出席だそうで、パール三昧のテスト。
これに、パールの指輪をプラス。どうよ！（笑
期間限定写真は削除しました。
ddns 更新スクリプト ― 2017年03月02日
自称技術系なので（ホントか？）、タマにはLinux ネタでも。
経費削減のため自宅のサーバーの固定ＩＰアドレス運用をやめました。
ところで、ddns (ddo.jp) の更新は毎朝cron で叩きに行ってるのですが、
あまりに芸がないので、適当なスクリプトを作ってみました。
めんどくさいのでエラー処理なしの決め打ちスクリプトです。
って、シェルスクリプトなんて超久しぶりに書いた。
最初はawk '{print substr($3,8,15)}' とかでアドレスのみ抽出したけど、
良く考えると意味ないぢゃんみたいな迷走ぶり。（笑
ルーターに割り当てられたグローバルＩＰアドレスを知らなきゃいけないのですが、
契約プロバイダにＩＰアドレスを返してくれるページがあったのでそれを利用。[1]
ってか、たまたまそれを見つけたので書いてみた次第。
asahi-net とddo.jp 限定スクリプトです。
これをcron で３時間毎にでも回そうかと。
経費削減のため自宅のサーバーの固定ＩＰアドレス運用をやめました。
ところで、ddns (ddo.jp) の更新は毎朝cron で叩きに行ってるのですが、
あまりに芸がないので、適当なスクリプトを作ってみました。
めんどくさいのでエラー処理なしの決め打ちスクリプトです。
って、シェルスクリプトなんて超久しぶりに書いた。
最初はawk '{print substr($3,8,15)}' とかでアドレスのみ抽出したけど、
良く考えると意味ないぢゃんみたいな迷走ぶり。（笑
ルーターに割り当てられたグローバルＩＰアドレスを知らなきゃいけないのですが、
契約プロバイダにＩＰアドレスを返してくれるページがあったのでそれを利用。[1]
ってか、たまたまそれを見つけたので書いてみた次第。
asahi-net とddo.jp 限定スクリプトです。
#!/bin/bash
dir=/var/local/ddns
wget --no-check-certificate -q -O - "https://asahi-net.jp/support/\
contact/0013.html" | grep remote_host > $dir/ip.txt
cmp -s $dir/ip.txt $dir/old.txt
if [ $? -eq 1 ] ; then
wget -O - 'http://ddo.jp/dnsupdate.php?dn=hoge&pw=hage'
fi
rm $dir/old.txt
mv $dir/ip.txt $dir/old.txt
これをcron で３時間毎にでも回そうかと。
[1]他のサイトにも似たようなサービスがあるけど気持ち悪いので。
最近のコメント