如何在tcl中使用换行符剪切和发布？

Question

catch [list exec find /home/gusman/mp3 -name "*$title*" -type f -printf "%f,"] song

我以这种方式切割和划分： regsub -all "," $song "\n" song

并以这种方式发布他们 putserv "notice $nick :$song"

结果只发布一行
<Botnick>: Title song.mp3

而在搜索文件中有几首歌曲标题

我想这样发贴：
<Botnick>:1 Title song.mp3
<Botnick>:2 Title song.mp3
<Botnick>:3 Title song.mp3
根据搜索结果的数量。

Answer 1

为什么要使用额外的,字符进行打印，然后使用换行符替换它们，而不是直接使用换行符？

我猜你也错过了split和foreach循环。

这对我有用：

catch [list exec find /home/gusman/mp3 -name "*$title*" -type f] songs
foreach song [split $songs \n] {
    putserv "notice $nick :$song"
}