在后端工作完全自动化时代到来之前,为了一定程度上解放攻城狮的双手,脚本便成了手中的利器。常用的脚本语言有Tcl,shell,Perl等。这里先举例介绍下文本处理的脚本语言框架
。
用途:读file1,逐行匹配,将匹配到的行写入file2
1.Tcl 脚本示例
set n [open ./file1 r]
set m [open ./file2 w]
while {![eof $n]} {
gets $n line
if {[regexp "*" $line]} {
puts $m $line
}
}
close $n
close $m
分别打开句柄m,n, 进行读写操作,循环判断是否读到行末,进行逐行匹配(可根据具体需要改变正则表达式进行匹配),将匹配到的写入file2.
另一种写法:
set n file1
set m [open ./file2 w]
dbForEachFileLine $n line {
if {[regexp "*" $line]} {
puts $m $line
}
}
循环命令基于EDI工具(encounter,innovus)等,然后进行逐行匹配。
2.Perl 脚本示例
open FILE,‘<’ , 'file1' ;
my @ff = <FILE>;
my $line;
open OUT,'>>','file2';
foreach $line (@ff) {
print OUT $line;
}
close FILE;
close OUT;
3. grep "*" file1 > file2