如何用Tcl结合正则查找文件特定行并对比路径差异

需求说明 #

我有两个内容相似的文件，需要从中提取特定行并对比对应值。感兴趣的行示例如下：

第一个文件内容 #

11 stringABC /dir/path/to/stringABC 
20 stringXYZ /dir/path/stringXYZ 

第二个文件内容 #

13 stringABC /dir/path/of/secondFile/stringABC
151 stringXYZ /dir/path/stringXYZ
25  stringabc /dir/path/to/stringabc

识别目标行后，需完成以下输出：

• 展示stringABC的路径差异
• 展示stringXYZ的路径匹配情况
• 指出第一个文件中缺失的stringabc条目

正则匹配需求 #

需要匹配以数字开头、后跟字符串再跟目录路径的行，现有三个正则片段：

First :  "{^(\d)*}"
Second: "[a-z]"
Third : "{(^/)}"

需将这三个片段组合成完整正则表达式以匹配目标行。

内容的提问来源于stack exchange，提问作者Heyya