Visit Our UNIX and Linux User Community


Help with Tcl...


 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting Help with Tcl...
# 1  
Old 09-27-2007
Help with Tcl...

Hello Tcl Experts,


set i 0

while { $i < 10 } {
puts "$i"
incr i
}

I am trying to print the value of "i" at the same place. i.e. it should first print "1", then in next iteration print "2" over the location of "1" and so on.... (i.e. in every iteration, delete the previous number and print the next number at the same place)...
I tried various combinations of switches(blindly), but couldn't make it work.. The next value is always printed in new line... Smilie

Present Output:

0
1
2
3
4
5
6
7
8
9


I want:

9

or atleast

1 2 3 4 5 6 7 8 9

I hope I am able to make myself clear.

Thanks...
# 2  
Old 09-28-2007
Hi.
Code:
#!/usr/bin/env tclsh

# @(#) tcl1     Demonstrate tclsh feature.

set i 0

while { $i < 10 } {
  puts -nonewline "$i"
  incr i
}
puts ""

exit 0

Producing:
Code:
% ./tcl1
0123456789

See any of the several hits for Google tcl puts ... cheers, drl
# 3  
Old 09-28-2007
thanks..
should have googled it... Smilie

Previous Thread | Next Thread
Test Your Knowledge in Computers #97
Difficulty: Easy
Unix is a multi-user operating system where the same resources can be shared by different users even if they do not have the proper permissions to do so.
True or False?

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Help with TCL script

I need to read a file, the file has a table in it. From the table I need to choose all the rows for which AVG 2 value is greater than 0.050 and write them on to a separate file. Please help me with the TCL script for this. Thanks in Advance (0 Replies)
Discussion started by: tonystark
0 Replies

2. Programming

Tcl script

Dear Users I'm struck by while the following tcl script. foreach l { set w($l) {} set fsum 0 foreach ftemp $f($l) { set fsum lappend w($l) $fsum } } It shows me error as "missing operand at _@_ in expression "0.10308400000000001 + _@_* 0.4 * 1" ... (0 Replies)
Discussion started by: bala06
0 Replies

3. Shell Programming and Scripting

help in tcl...

how can i make a list with the n last files and their details in tcl?.. thanks. (0 Replies)
Discussion started by: eee
0 Replies

4. UNIX for Advanced & Expert Users

Please help me in tcl/tk

i am new one to tcl/tk OTP-ARB:/home/ponmuthu/tcl=>/usr/bin/tclsh tclsh tclsh8.4 OTP-ARB:/home/ponmuthu/tcl=>/usr/bin/tclsh % wish Application initialization failed: no display name and no $DISPLAY environment variable when i give like that i am getting error Application... (0 Replies)
Discussion started by: ponmuthu
0 Replies

5. Shell Programming and Scripting

TCL in NS2

Hi all, I wrote a TCL script in NS2 which involves running multiple Voice and video sessions. Am not able to troubleshoot one error at all. Can anyone please help me please. I am ready to send the documents if possible. please please help me guys !! I am trying to solve the problem since... (0 Replies)
Discussion started by: mehera
0 Replies

6. Shell Programming and Scripting

read -e and Tcl

Hello, I'm trying to make Tcl work with GNU readline. Tried searching the forum but difficult to find this specific thing with "read" search query. Could someone help me to understand the following behavior? $ read -e asdfasdfasdfasddddf $ tclsh % exec read -e /usr/bin/read: read: bad... (0 Replies)
Discussion started by: pn8830
0 Replies

7. Shell Programming and Scripting

Need your help - tcl

Hello, Can someone explaine me the meaning of this program: #! /usr/bin/tclsh set mctal set a set b set c set d set e while {! line cell]} { } while {! line]} { } while {! line cell]} { } while {! line]} { } (0 Replies)
Discussion started by: jolecanard
0 Replies

8. Shell Programming and Scripting

TCL, how to

Does any one know how to capture the output of command called from a TCL script? I cannot figure this out. I've been working on it for 4 hours now :confused: (2 Replies)
Discussion started by: Lorna
2 Replies

9. Shell Programming and Scripting

tcl/expect

Can someone identify what is the problem here?. no children while executing "exp_wait -nowait -i -1" (procedure "logOptions" line 45) invoked from within "logOptions" (procedure "doExecute" line 98) invoked from within "doExecute" (procedure "main" line 32) ... (7 Replies)
Discussion started by: calsum
7 Replies

10. Shell Programming and Scripting

TK/TCL Help

can someone tell my why the puts is not reflecting the variable? CUT --> set fp while {-1 != } { button .a${line} -text "${line} " -width 20 -command { puts $line } pack .a${line} } (0 Replies)
Discussion started by: hpuxrox
0 Replies

Featured Tech Videos