2015-11-02 75 views
0

我是新手,仍然在学习Tcl。如何将数据从2个文件存储到数组并比较tcl

现在,我有2个文件有不同的数据,我想将它存储到数组中,并在结果中比较打印两个文件之间的数据差异成一个新的文本文件。例如,file1.txt

 
1 
2 
3 

虽然file2.txt有数据

 
2 
4 
5 

比较,发现差异后,记录到一个新的文本文件,file3.txt。这就像

 
4 
5 
+0

所以...这是一个单向的区别,描述了添加的_new_行,而不是删除的_old_行。订单重要吗? –

+0

@DonalFellows是的,老线也很重要,这样我可以在不同的文本文件中存储相同的数据和不同的数据 – Kev

回答

2

你可以使用Tcllib的struct::set包。将文件中的值读入列表中,

package require struct::set 
::struct::set difference {2 4 5} {1 2 3} 

然后写出结果。

+1

并使用'fileutil :: cat'或'fileutil :: foreachLine'来读取文件 –

相关问题