我想在tcl中这样做。但是我只是在一周前开始tcl，
我有下面的数组，我想修改column2中的元素。检查column2中的每个元素，以及它在column1中的首次出现以及在column2（特定行的）中对应的元素
A N B 0
B J P 1
C A U 9
A B O 4
W L K 0
例如，第2列第3行中的C是A，而第1列中的A在第1行中首次出现，而其在第2列中的对应元素是N。
第二个示例：column2的行4中的元素是B。B第一次出现在column1的row2中，其对应的列2中的元素是J。
所需的输出：
A N B 0
B J P 1
C N U 9
A J O 4
W L K 0