作者: Ueta Masayuki
日時: 2006/2/28(08:53)
植田です。

Bruceさんの出力では,全角と半角のスペースが出力さ
れず,またlengthでそれらがカウントされていないのを不
思議に思い,同じスクリプトをWindows2000上で動かして
みました。

E:\SCR\Tcl>copy con t060228b.tcl
set str {こんにちは  世界}
puts [string length $str]
puts [string bytelength $str]
puts [regexp {\s+} $str]
puts [regexp -indices {\s+} $str pos]
puts $pos
^Z
        1 個のファイルをコピーしました。

E:\SCR\Tcl>tclsh t060228b.tcl
9
25
1
1
5 6
lengthが全角と半角のスペースをそれぞれ1文字とカウン
トしています。

Active Tcl8.4.12.0を使いました。