Search results for query: *

Try: set a apple if {$a == "apple" } { puts 1 }

set nam "[ clock format [ clock seconds ] -format "%Y-%m-%d" ].log" (I suggest revers date for easier sorting)

suggestion: last command before return after 10 "destroy $w

Hi, - there's a built in way to solve your problem. You should use the "entry" command with option "-show"; the following char ( strictly the first char of the following string ) is the displayed character, e.g. entry .widgetname ..... -show "*" That applies also for doing copy-and-paste, you...

Strings with a leading zero are classified by TCL as an octal number. And then "08.." or "09.." are impossible values. Your solution with "string is digit" is ok., but there's a comment in the string manuel page: "string is digit --> Any unicode digit character. Note that this includes...

freewrap you can find at: http://freewrap.sourceforge.net/

In the first solution you should use the value of "$match" and not that of "$dummy" ;-) esjo

If you would to solve your problem with a single regular expression try: regexp {^(.*?)&&} $bw dummy match Easier to understand is the following two-line-version: regexp -indices {&&} $bw indx set match [ string range $bw 0 [ expr [ lindex $indx 0 ] - 1 ] ] good luck !

Try it with: regsub {<table.+<table.+/table>.+/table>} $yourstring {<pre>&</pre>} yourstring with "$yourstring" standing for one complete line as described above

It's a nice idea to use the &quot;string map&quot;-command, but, sorry, I think it's not the solution for the original problem. The purpose is, to find a pattern &quot;blue&quot; an then to replace another string &quot;aaaa&quot; (not the pattern) at the same line with a subsitution value...

There was a little omission in the third line - sorry ! Here again the complete code: #----------------------------------------------------------- set pattern &quot;AAA&quot; set table &quot;&quot; set inp [ open $substitutionfile r ] while { [ gets $inp line ] >= 0 } { lappend table $line }...

I tried this to solve your problem: ( You'd only to assign the values of &quot;aaaa&quot; &quot;bbbb&quot; to the lines of your substitution table ( second file or third column in your substitution file ?? )) 1. Reading your substitution file to a list: set ytable &quot;&quot; set inp [ open...

Thanks for your responses! Here the answers of your questions: to &quot;Bong&quot;: It's only the TCL-Subshell that crashes; the OS is free. to &quot;Bob Rashkin&quot;: The construct {set [ channel [ open &quot;| ***.exe&quot; &quot;parameters&quot; ] ... and so on} I use usually ( so I can...

I use TCL/TK 8.3.2 under WINNT 4.0. For generating filed based checksums I'd to absolve a loop containing an &quot;exec&quot;-command. When then number of files reaches the limit of some thousand files the script breakes and the TCL-parser is frozen. To reach that point it's irrelevant, what...

I'm using the following method within a procedure-call far all kinds of executables (*.exe,*.bat,...) The filename of the executable ( inclusive parameters as a quoted string ) has to assign to &quot;var(fil)&quot; Results are: 1.) The error-counter $var(flt) (zero means all right) 2.) All the...