Tcl: 怎么得到目录和其子目录下的所有.v文件

yanpeace

dir: /home/dut/包含：
                     /a.v
                     /sub/b.v
                     /sub/core/cc.v

set dir = /home/dut/

如何得到 $dir下的所有 .v 文件？ 谢谢

zero_0

find $dir | grep \\.v\
tcl 可以用system 命令