我正在处理代码以检查给定的输入文件是否正确。
我们将向lsf提交文件(例如runfile
);我们将指定一些文件作为输入,例如:
运行文件
input_file = input.txt
inputanother_file = another.tcl
input.txt
1
2
3
4
another.tcl
merge = aaa -bbb -ccc merge.txt
merge.txt
cell (1)
{ something ;
something else ;
}
cell (2)
{ something ;
something else ;
}
我应该在runfile
中搜索以获得another.tcl
,在another.tcl
中又有一个merge.txt
文件(其中包含有关输入内容的详细信息),所以我应该检查此merge.txt
是否存在。如果存在,我应该搜索inputs.txt
的内容。
我已经编写了将搜索another.tcl
的代码,并且它将检查merge.txt
,但是我无法在input.txt
中找到merge.txt
的内容:
open(my $fh, '<', 'runfile') or die "Could not open runfile: $!";
system(" cat ` grep -i '.tcl' runfile | cut -f2 -d "="` | grep -i 'merge' | cut -f6 -d " " ");