Tcl编程用名称排序文本文件

Question

我是TCL编程的新手。 我的问题是我有多个文本文件 （例如：sysDataUpdate_1119041809_1.sql，sysDataUpdate_1119041809_2.sql ....... sysDataUpdate_1119041809_50.sql）位于“ABC”目录中。

现在我想要最高编号的.sql文件，如“sysDataUpdate_1119041809_50.sql”？

Answer 1

$result

Answer 2

使用glob列出文件，使用lsort -dictionary将其置于您描述的订单类型中。最后，将end与lindex一起使用将获得最大值：

set files [glob -directory ABC sysDataUpdate*.sql]
set sorted [lsort -dictionary $files]
set largest [lindex $sorted end]

如果您愿意，可以将其组成一行：

set largest [lindex [lsort -dictionary [glob -directory ABC sysDataUpdate*.sql]] end]