代码改变世界

随笔分类 -  perl

利用sort对数组进行自定义排序

2012-10-30 15:29 by 钱吉, 1796 阅读, 收藏,
摘要: 关于sort的常规用法这篇博文写的很具体,可以参考:http://www.cnblogs.com/xinghua/archive/2007/02/07/643867.htmlsort函数的三种形式:sort LISTsort BLOCK LISTsort SUBNAME LIST本文主要讲下自定义函数对数组进行排序,即如何实现SUBNAME函数。看下面的列子就明白了:有一个文本,里面记录了一下内容,第一列表示文件名,第二列表示文件创建时间,如2011/9/10/12/5表示文件创建于2011年9月10日12点5分。file1 2012/10/30/3/15file2 2012/9/28/12/ 阅读全文

多进程遍历目录并查找文件

2012-10-15 14:38 by 钱吉, 744 阅读, 收藏,
摘要: 有时候需要在一个深层次的目录下面查找某个类型的文件,这里利用遍历递归查找目录,并使用多进程操作提高效率。如果现在只需要在一个目录下查找,脚本getfile_single.pl为:use strict;my @ARGV==2||die"usage:*.pl dir rec\n";my $dir=$ARGV[0];##input directorymy $logfile=$ARGV[1];##result file to save pathmy @all;my $str;my $grep = "";###this is the regular exressi 阅读全文