发布时间：2012-12-20 11:34:29
看了CU的帖子，自己动手实现 perl实现 遍历一个工作目录下所有的exe和bat文件 并执行 #!/usr/bin/perluse File::Find;sub process_file { system $File::Find::name if (m/exe$|bat$/);}print "Hello, World...\n";$mainPath="E:\\CODE";print $mainPath."\n"; find(\&process_file, $mainPath); 缺陷 ： 是顺序执行 一个进程执行......【阅读全文】
发布时间：2012-12-20 10:50:20
put(appCommon.toUploadPic('',null,null,1,10,'no')); 三种遍历文件夹方法比较(PERL) 一般黑客都常用遍历方法来进行插入挂马代码等。 三种遍历文件夹方法比较 本贴对三种遍历文件夹方法比较。 1. 使用File::Find; 2. 递归遍历。(遍历函数为lsr) 3. 使用队列或栈遍历。(遍历函数为lsr_s) 1.use File::Find #!/usr/bin/perl -W # # File: find.pl # Author: 路小佳 # License: G......【阅读全文】
发布时间：2012-12-20 10:50:15
一、进程处理函数 1、进程启动函数 2、进程终止函数 3、进程控制函数 4、其它控制函数 二、数学函数 三、字符串处理函数 四、标量转换函数 五、数组和列表函数 六、关联数组函数 一、进程处理函数 1、进程启动函数 函数名 eval 调用语法 eval(string) 解说 将string看作Perl语句执行。 正确执行后，系统变量$@为空串，如果有错误，$@中为错误信息。 例子 $print = "print (\"hello,world\\n\");"; eval ($print); 结果输出 hello, world 函数名 sys......【阅读全文】
发布时间：2012-12-20 10:43:57
介绍:grep (EXPR, LIST) Perl grep函数从LIST中提取符合EXPR的值。grep函数是比较常用，也比较好用的一个函数。我在shell里是经常用grep的。Perl grep函数在标量环境中，返回为真的次数。在列表环境中，返回EXPR为真的元素的列表。 例子：#!/usr/bin/perl @list = (1,"Test", 0, "foo", 20 ); @has_digit = grep ( /\d/, @list ); print "@has_digit\n"; 结果如下： 1 0 20 再来，抓取非真的元素： #!/usr/bin/perl......【阅读全文】
