the "open" function in tcl can handle commands, you could use grep, try something like: set tf [open "| grep -e \"^d \" > dropped.tr" w]
ciao -- Marco Bonetti Slackintosh Linux Project Developer http://slackintosh.workaround.ch/ My GnuPG key id: 86A91047