郁闷呢，怎么这里没有人呢。

icps

1. 
   
2.   
   
3.   #!/usr/bin/perl
   
4.    
   
5.     $i=0;
   
6.     open(FH,">>ip");
   
7.     while($i<255){
   
8.      @pagv=`traceroute -m 5 -w 3 218.11.16.$i`;
   
9.       print FH "--------------  218.11.16.$i  --------------\n";
   
10.       foreach(@pagv){
    
11.         print FH;
    
12.         print;
    
13.       }
    
14.     $i++;
    
15.    }
    

复制代码

KornLee

是呀~~,郁闷~~:mad:

orangetouch

用PERL的人好少~

aniuge007

再加个python算了

home_king

最初由 aniuge007 发表
再加个python算了

主要是人气太少，建议经常提供一些系统管理的任务(比如说同样的shell code，用perl如何做得更好)大家做，斑竹自己也做。这样才能调动起气氛来。
至于python，我想会的人可能会更少。

icps

嗯。提议不错。其实大家可以自己出题目。自己来做。然后讨论那个做的比较好。这样即可以锻炼自己写代码的能力。还能调动气氛 。呵呵。

libinary

支持！！！
perl就是要“用”

orangetouch

所有讨论Perl的论坛都很冷清,不光是这里.只有讨论C/C++,JAVA之类的才会热闹~

KornLee

最初由 home_king 发表
主要是人气太少，建议经常提供一些系统管理的任务(比如说同样的shell code，用perl如何做得更好)大家做，斑竹自己也做。这样才能调动起气氛来。
至于python，我想会的人可能会更少。

严重同意home_king的意见~,这段时间我天天去上课,有几天没看我的小骆驼了~

devel

:thank :thank 只怪自己学得差。。。:eek:

这个脚本不带SHELL命令就更好了。有待大家的努力哦。。。