| |
| |
| |
|
Comments:
<0> ; set test.test 1 ; set test.test
<1> Gotisch: #3218 (5631 clicks) Tcl: 1
<2> how do you sort a list by the last letter of word
<3> =)
<4> where's lenny_ ?
<2> set stuff {apples dog cat car oranges garage house plums}
<2> puts $stuff
<1> Bmackly: #3232 (12239 clicks) Tcl: apples dog cat car oranges garage house plums
<1> Bmackly: #3233 (stdout) apples dog cat car oranges garage house plums
<2> how would i make a list with only the words ending in s
<2> anyone have any ideas
<2> ?
<4> you have to iterate and crop the elements, i guess
<2> beats me
<5> ; lsearch -all -inline $stuff *s
<1> neoxed: #3243 (214 clicks) Tcl: apples oranges plums
<5> bah he left
<0> ;proc wrp {arg} { set arg [string map {$:: $ \{:: \{} $arg]; return [uplevel { subst $arg }] }
<1> Gotisch: #3266 (39576 clicks) Tcl:
<0> ;wrp "test"
<1> Gotisch: #3267 (53376 clicks) Tcl error: can't read "arg": no such variable
<0> ye
<0> ;proc wrp {arg} { set arg [string map {$:: $ \{:: \{} $arg]; return [uplevel subst $arg] }
<1> Gotisch: #3269 (369 clicks) Tcl:
<0> ;wrp "test"
<1> Gotisch: #3270 (696 clicks) Tcl: test
<0> ;set a test1 ;wrp {test $a}
<1> Gotisch: #3271 (2845 clicks) Tcl error: bad switch "test": must be -nobackslashes, -nocommands, or -novariables
<0> hehe
<0> ;proc wrp {arg} { set arg [string map {$:: $ \{:: \{} $arg]; return [uplevel subst -- $arg] }
<1> Gotisch: #3273 (386 clicks) Tcl:
<0> ;set a test1 ;wrp {test $a}
<1> Gotisch: #3274 (896 clicks) Tcl error: bad switch "--": must be -nobackslashes, -nocommands, or -novariables
<0> ;proc wrp {arg} { set arg [string map {$:: $ \{:: \{} $arg]; return [uplevel subst {$arg}] }
<1> Gotisch: #3275 (383 clicks) Tcl:
<0> ;set a test1 ;wrp {test $a}
<1> Gotisch: #3276 (879 clicks) Tcl error: can't read "arg": no such variable
<0> ;proc wrp {arg} { set arg [string map {$:: $ \{:: \{} $arg]; return [uplevel subst \{$arg\}] }
<1> Gotisch: #3277 (402 clicks) Tcl:
<0> ;set a test1 ;wrp {test $a}
<1> Gotisch: #3278 (781 clicks) Tcl: test test1
<0> ;set a test1 ;wrp {test $a $::botnick}
<1> Gotisch: #3279 (779 clicks) Tcl error: can't read "botnick": no such variable
<0> ;set a test1 ;wrp {test $a ${::botnick}}
<1> Gotisch: #3280 (801 clicks) Tcl error: can't read "botnick": no such variable
<0> ;subst -nocommands -nobackslashes {\001 test \001}
<1> Gotisch: #3281 (165 clicks) Tcl: \001 test \001
Return to
#tcl
or
Go to some related
logs:
ps-watcher ini
#heroin
Crime: Tandoor Kand
dalnet indent problem
libdm.so.0
#politics
dell 2405fpw on xandros
#photoshop
#worldcup
#nhl
|
|