作者: TriVector 应该是这个: net::ping Pearl 官方手册 比如: 代码: my $a; my $p; use Net::ping; $p = Net::ping->new(); $a= $p->ping("$host"); $p->close(); #在这里做你要得选择判断 谢谢你给的资料!
my $a; my $p; use Net::ping; $p = Net::ping->new(); $a= $p->ping("$host"); $p->close(); #在这里做你要得选择判断
走得再远学的再深也难圆Turing梦
目前有1位用户正在查看此主题。(0 位会员和 1 游客)
讨论区规则
书签