发布时间：2012-12-20 11:41:15

最近做东西老用到处理时间的问题，索性写几个函数。 #!/usr/bin/perl -w#===============================================================================# Copyright (c) 2009,# All rights reserved.# 摘    要 ：一些常用的时间处理函数# 作    者 ：2009-12-15 xingwang# 版    本 ：0.01#===========......【阅读全文】

发布时间：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:57:21

#!/usr/bin/perluse strict;my $dir = $ARGV[0];&fun ($dir);subfun (){  my $current = shift;  opendir DIR, $current or die "can not open dir";  my @ list = readdir DIR;  foreach my $item (@list)  {    if (-f $current."/".$item) &......【阅读全文】

发布时间：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......【阅读全文】