会python真的可以为所欲为0(回)
350天前
这里还有人吗1(回)
535天前这里还有人吗0(回)
535天前
每天面对着电脑屏幕，敲打键盘。我所面对的并不只是代码，而是一种生活方式。0(回)
760天前到处都是羊，不想上班0(回)
840天前
鸽子
0(回)
844天前#----------------------------- |
use Net::Ping; |
$p = Net::Ping->new() |
or die "Can't create new ping object: $!\n"; |
print "$host is alive" if $p->ping ( $host ); |
$p->close; |
#----------------------------- |
# use TCP if we're not root, ICMP if we are |
$pong = Net::Ping->new( $> ? "tcp" : "icmp" ); |
(defined $pong) |
or die "Couldn't create Net::Ping object: |
$!\n"; |
if ($pong->ping("kingkong.com")) { |
print "The giant ape lives!\n"; |
} else { |
print "All hail mighty Gamera, friend of children!\n"; |
} |
#----------------------------- |
by: 发表于：2017-09-15 16:56:03 顶(0) | 踩(0) 回复
？？
回复评论