[connect24h:03577] RE: 経路チェックのプログラム

["tadashi nagao" <tadashi@xxxxxxxxx>]

　□■□■□■□■□■□■□■□■  中小企業様、個人事業者様、必見!!
　■　インターネットで仕事獲得　□　 ●Web構築、印刷、会計処理、翻訳●
　□ 　　　　楽天ビジネス　　　 ■　 ●全国の見込案件を次々ご紹介！ ●
　■□■□■□■□■□■□■□■□　 ●今なら参加特典もつきます！　 ●
　　 Click!⇒ http://business.rakuten.co.jp/apply/index.cfm?afl=fvq 
------------------------------------------------------------------------


長尾です。

どうも、ありがとうございます。

私は、次の奴を、ping 対象アドレス  |perl 下記のプログラム &
で動かしています。とりあえず、タイムスタンプとっているのがみそ
if($1>60)　の値を変更すると、time 値が大きいのがとれます。
チェックはめでみてやります。

で、今とれたばっかりのデータがこれ、ms が単位です。
ssh がぶちぶちきれて使い物になりません。

18:27:55 8790.7
18:27:55 7791.3
18:27:55 6791.8
18:27:55 5792.3
18:27:55 4792.9
18:27:55 3793.4
18:27:55 2794.0
18:27:55 1794.5
18:27:55 795.0
18:27:58 61.0


penemo なんかで、５分おきにチェックもいいのですが、１秒くらい
こけるタイプのエラーなんで、こうするようにしています。

while(<>)
{
($sec,$min,$hour,$mday,$mon,$year,$wday)=localtime();
open(OUT,'>>warning.tmp');
if($_=~/time=(.+) ms/){
if($1>60)
{print OUT  $hour.':'.$min.':'.$sec.' '.$1."\n";}
}
close(OUT);
}

> 
> また、以下のようにすればping平均値も取れるので、「何秒以上だったら」
> のような処理も可能です。
> result = `/sbin/ping -c 1 $checkserver ~
> | /usr/bin/grep round-trip ~
> | /usr/bin/awk '{print $4}' ~
> | /usr/bin/awk -F: '{print $2}'`
> 
awk がつけるのもいいですね。私は、perl しか使えません。
sed や、awk くらいちゃんと使えると便利なんですけど、 



------------------------------------------------------------------------
　えっ、友達とのペアで毎日１００万円が当たるチャンス!　　楽ぴた倶楽部
　　                 http://www.rakupita.ne.jp/