求助批处理高手,从一堆文本文件中查找特定字符,并输出所在文本的文件名. 查找当前文件夹及子文件夹中
求助批处理高手,从一堆文本文件中查找特定字符,并输出所在文本的文件名.查找当前文件夹及子文件夹中所有文本文件是否有"荣华富贵",没有略过,有就把该文件名记录在新建的cod...
求助批处理高手,从一堆文本文件中查找特定字符,并输出所在文本的文件名. 查找当前文件夹及子文件夹中所有文本文件是否有"荣华富贵",没有略过,有就把该文件名记录在新建的cod.txt中. if end
展开
1个回答
2014-05-22
展开全部
用perl很方便:
#!/usr/bin/perl -w
use strict;
use feature('say');
use File::Find;
use FileHandle;
find(\&wanted,$ARGV[0]||".");
sub wanted{
if( -f $_ and /\.txt$/i){
my $fh=FileHandle->new($_,"r");
while ( my $line=$fh->getline ) {
if ( $line=~/荣华富贵/ ) {
say $File::Find::name;
}
}
undef $fh;
}
}
#!/usr/bin/perl -w
use strict;
use feature('say');
use File::Find;
use FileHandle;
find(\&wanted,$ARGV[0]||".");
sub wanted{
if( -f $_ and /\.txt$/i){
my $fh=FileHandle->new($_,"r");
while ( my $line=$fh->getline ) {
if ( $line=~/荣华富贵/ ) {
say $File::Find::name;
}
}
undef $fh;
}
}
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询