use warnings;
use net::ping;
$j=0;
$k=0;
for ($i = 1;$i <= 1000;$i++)
$host = $argv[0];
$p = net::ping->new("icmp");
if ($p->ping($host,5))
else
$p->close();
#sleep(1);
print "$host alive is $j\n";
print "$host lost is $k\n";
}##第二個引數為預設超時值($def_timeout)，以秒為單位，設定此值是為了定義ping方法的超時值，預設為5秒
##第二個引數為預設超時值($def_timeout)，以秒為單位，設定此值是為了定義ping方法的超時值，預設為5秒
if a default timeout ($def_timeout) in seconds is provided, it is
used when a timeout is not given to the ping() method (below). the
timeout must be greater than 0 and the default, if not specified, is
5 seconds
$p->ping($host [, $timeout]);
ping the remote host an
1000個蘋果分10個裝箱
1000個蘋果放入10個箱子。客戶如果要獲得1 1000個蘋果中的任意個數，都可以整箱搬，而不用拆開箱子。問是否有這樣的裝箱方法？二進位制數組合 110 1001000 可以表示任何0x01 0xff之間的數字，所以按照這樣的思想，110 1001000 10000 100000 1000000 1...
PING 乙個網段
dos windows的命令列 批處理 for l p in 1,1,254 do ping 192.168.1.p n 1 find reply from i 在dos視窗執行上面的批命令,就會顯示出任何開機的ping結果.假如顯示ping不通的任何結果,則命令為 for l p in 1,1,2...
演算法題 1000個蘋果和10個箱子
最近去面試筆試遇到一道演算法題，題目是放在最後面的加分題，大概內容如下 現在有1000個蘋果，和10個箱子，如何把這1000個蘋果裝在這10個箱子裡，才能使不管任何數量 1 1000 的蘋果，都能一次給出？當時我基本沒思路，也沒多少時間，直接跳過了 後來查了一下，用到二進位制的思想 1000個蘋果，...