在Tcl中启动浏览器或者外部程序

# 2008/12/10 03:59 @ Sean Zhang

• 参考：[[http://wiki.tcl.tk/557|Invoking browsers]]

下面的例子主要是针对Windows而言。上文中包含了多平台的方案。

set url http://sina.com.cn/
eval exec [auto_execok start] [list $url] &

或者

proc url x {
  set x [regsub -all -nocase {htm} $x {ht%6D}]
  exec rundll32 url.dll,FileProtocolHandler $x &
}

url http://sina.com.cn/