tcl 运行linux 命令,[求助]tclsh执行linux命令获得stdout,stderr和errno-

..} {01/29/200904:01 AM 1,658,715

base-tcl8.5-thread-win32-ix86.dll} {01/29/200904:01 AM 1,085,271

base-tcl8.5-thread-win32-ix86.exe} {01/29/200904:01 AM 1,689,473

base-tk8.5-thread-win32-ix86.exe} {04/14/200911:30 AM 0 db1}

{04/14/200910:58 AM

SQLITE} {05/14/200812:22 PM 449,286

sqlite3.exe} {01/28/200912:52 PM 823,296 tcl85.dll}

{01/28/200912:52 PM 16,384 tclpip85.dll} {01/28/200912:52 PM 32,768

tclsh85.exe} {04/13/200905:11 AM 756,305 tclsqlite3.dllw}

{01/29/200904:01 AM 2,196,587 teacup.exe} {01/28/200912:13 PM

1,011,712 tk85.dll} {01/28/200910:55 AM 194,419 tkcon.tcl}

{01/28/200912:13 PM 36,864 wish85.exe} { 13 File(s) 9,951,080

bytes} { 3 Dir(s) 2www.dgdaming.com,000,924,672 bytes free}"

(bin) 7 %

[ 本帖最后由 iamkey9 于 2009-4-15 14:31 编辑 ]猜猜猜

set f

set result

catch {close $f} errormsg

puts "the stdout ==> $result"

puts "the stderr ==> $errormsg"

别外这和shell没多