查找.gz文件的某些行匹配情况

查找一个压缩的.gz中是否有指定匹配某一行。

#!/bin/perl
#

print ("grep gz and find finish simulation line. \n");
$log_gz = 'test.log.gz';
print ("log of gz is $log_gz \n");
open (FILE, "gunzip -c $log_gz | tail -1000 |") or die("can not open $log_gz");
open (STATUS, ">status.log");
$test_cnt = 0;
while(<FILE>){

	chomp();
	if(/finish\sat\ssimulation\stime/){
		print STATUS ("$log_gz find end mark.\n");
		print ("$log_gz find end mark.\n");
		last;		
	}
	$test_cnt++;
	print("$test_cnt \n");
}

close (FILE);
close (STATUS);

技巧：

1，gunzip -c 不真正解压.gz文件，而是检查该文件，不会生成多余的文件。

2，使用通道技术： | tail -1000 只查找自己感兴趣的最后1000行。

3，最后一个 | 是不能少的。

4，找到了可以使用last退出while循环。

另外可以使用 zgrep “start” ./xxx.gz

调用perl脚本：

system("zgrep “start” ./xxx.gz >> out.log");

同样的也可以处理非gz文件，如果处理文本文件：使用cat命令

open (FILE, "cat $log_gz | tail -1000 |") or die("can not open $log_gz");