perl的Net::Ping不能运行是怎么回事呢？!（结帖）

linuxnextyear

UID: 8338
帖子: 10
积分: 23
在线时间: 10 分钟

11^# linuxnextyear 发表于 2008-01-29 09:36

谢谢楼上几位的提醒：

[Copy to clipboard] [ - ]

CODE:

#use strict;

use Net::Ping;
$host='www.baidu.com';
$p = Net::Ping->new("icmp");
#$p->bind($my_addr);
print "yes" if $p->ping($host, 2);

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

12^# flw 发表于 2008-01-29 10:17

QUOTE:

原帖由 linuxnextyear 于 2008-1-29 09:36 发表
谢谢楼上几位的提醒：

#use strict;

use Net:ing;
$host='www.baidu.com';
$p = Net:ing->new("icmp";
#$p->bind($my_addr);
print "yes" if $p->ping($host, 2);

早就提醒过让你看文档了，
难道你下次还打算依靠别人？

linuxnextyear

UID: 8338
帖子: 10
积分: 23
在线时间: 10 分钟

13^# linuxnextyear 发表于 2008-01-30 09:48

QUOTE:

原帖由 flw 于 2008-1-29 10:17 发表

早就提醒过让你看文档了，
难道你下次还打算依靠别人？

我是按照一个教程上打的例子,没想到会出这种问题.<PERL编程24学时教程>

ly5066113

UID: 41125
帖子: 34
积分: 78
在线时间: 1 小时

14^# ly5066113 发表于 2008-01-30 10:30

QUOTE:

原帖由 linuxnextyear 于 2008-1-30 09:48 发表

我是按照一个教程上打的例子,没想到会出这种问题.

QUOTE:

原帖由 flw 于 2008-1-24 13:30 发表

24 小时那个，我不建议看，写得很差，外行人写的。
应该是小骆驼、黑豹书、大骆驼。

linuxnextyear

UID: 8338
帖子: 10
积分: 23
在线时间: 10 分钟

15^# linuxnextyear 发表于 2008-01-30 10:59

QUOTE:

原帖由 ly5066113 于 2008-1-30 10:30 发表

哦,多谢提醒