发布时间：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......【阅读全文】
发布时间：2012-12-19 20:22:27
Perl 中的正则表达式 1 正则表达式的三种形式 首先我们应该知道 Perl 程序中，正则表达式有三种存在形式，他们分别是： 匹配：m/<regexp>/ （还可以简写为 /<regexp>/ ，略去 m） 替换：s/<pattern>/<replacement>/ 转化：tr/<pattern>/<replacemnt>/ 这三种形式一般都和 =~ 或 !~ 搭配使用（其中 "=~" 表示相匹配，在整条语句中读作 does，"!~" 表示不匹配，在整条语句中读作 ......【阅读全文】
发布时间：2012-12-19 20:22:15
1，indexposition = index (string, substring, position)返回子串substring在字符串string中的位置，如果不存在则返回-1。参数position是可选项，表示匹配之前跳过的字符数，或者说从该位置开始匹配。例子如下：[root@localhost ~]# echo -n '/var/fap/test/123' | perl -ne '$rev=index($_, "a"); print $rev,"\n";'2[root@localhost ~]# echo -n '/var/fap/test/123' | perl -ne '......【阅读全文】
