お世話になります。
perlにてpingプログラムを実装しているところですが
WEBに以下のように記載されていましたので実行したところ
icmp socket errorと表示されてしまいます。
>use Net::Ping;
>$host="xxx.xxx.xxx.xxx";
>$timeout=0.1;
>$pObj = Net::Ping->new("icmp");
>if($pObj->ping($host, $timeout)){
>print "$host is running.\n";
>$pObj->close();
>}
普通にpingを打つと応答します。
なぜでしょうか。
(OS:windowsXP)
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
試してみました。
コマンドプロンプトでは
管理者権限のユーザー=>192.168.1.7 is running.
管理者以外でだと =>何も表示されずに終了
そこで
print "Content-type: text/html\n\n";
print "<html>\n<h1>pingtest</h1>\n<pre>\n";
を付けてCGIにしてみると(XPhome+Apache For win32の1.3.34と2.0.55の両方)
CGIでなら管理者でもユーザーでも192.168.1.7 is running.が表示されました。(ま、当然か)
そこでfirewallの詳細設定でICMPをブロックすると
管理者だろうがCGIだろうが応答無しで
普通にping打つと Destination net unreachable.
アドバイスどころかむしろ混乱の元にならなければ良いですが
No.1
- 回答日時:
perldoc Net::Pingには、「icmpを使用する場合、root権限で実行する必要がある」と書いてますので、WindowsだとAdministratorなら実行できるのでは。
参考URL:http://search.cpan.org/src/TEVERETT/Win32-PingIC …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(インターネット接続・インフラ) ブラウザにIPアドレス入力した時 1 2022/06/16 19:08
- 日本語 ドゥーイングとピンポンはどちらも語末が「ŋ」なのにカタカナの表記が違うのか 2 2022/07/14 08:41
- その他(パソコン・周辺機器) チャレンジタッチ3 改造 アプリインストールできない 1 2022/07/01 14:43
- アプリ APEXをやっていて通常pingが30くらいなんですけど3分に1回100↑pingになります。 この 1 2022/04/21 23:15
- ゲーム PS4のフォートナイトやAPEXでWiFiのping?が10秒に一回の頻度で100、200を超えたり 1 2022/04/29 19:12
- Excel(エクセル) SUMIFSと日付変換 10 2023/04/16 15:38
- Gmail 【お助け!】サーバーからのメール送信でGmailに送信されない問題について 1 2023/06/20 22:03
- その他(Microsoft Office) パワークエリの複数ファイルのデータ統合について 3 2022/07/14 17:06
- ゲーム スマホゲームのping値について 昨日から、オンラインスマホゲームのping値がとても高くなりまとも 2 2022/08/19 22:52
- ネットワーク コマンドプロンプトで、コマンドの飛ばし方を教えてください。 ネットワークにデータを飛ばす(copy) 4 2022/10/19 11:21
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
CLispのloop内の挙動について
-
Win98+PWS4.0でPERLが動作しま...
-
ハノイの塔の問題で困っており...
-
[perl] next と return 同じ意...
-
HASH(0xほげほげ)
-
Perlで複数の値を返す良い方法...
-
dieやPerl自体でエラーが発生し...
-
Application.ScreenUpdating = ...
-
JSONで文字列が長い時
-
formで特定のinputを送信しない...
-
実行時エラー 3020の対策
-
16進の10進変換について
-
Pythonでターミナルに文字を出...
-
文字のカラーとフォントの指定...
-
パイソンのクラスについて
-
c言語 16進数の2進数への変換
-
パイソンのクラスのブログラム
-
<SELECT>タグの折り返し
-
セレクトメニューで2つの項目...
-
Djangoについて!このドットの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Perlで複数の値を返す良い方法...
-
HASH(0xほげほげ)
-
プロトタイプ宣言のワーニング...
-
Pythonのプログラミングの質問...
-
Net::SSH::Perlについて
-
perlのスクリプトどこが間違っ...
-
print <<"_HTML_"の中でサブル...
-
内部処理形式が日付型 (Date) ...
-
Perlで use strict して our変数
-
変数に値を代入するのに、まずu...
-
Perlで足し算をするには
-
連想配列とforeach
-
Perl:計算誤差について
-
icmp socket error
-
Perlで自分自身の関数名を知る...
-
PERLの「!=」と「=~」 or...
-
[perl] next と return 同じ意...
-
for文の中でのforeachの問題
-
PerlでCabochaを呼び出すには(...
-
Net::Telnetでタイムアウト時間...
おすすめ情報