String padding in Tcl

[anirban2k2001]

Hello everyone,


I need to write some fixed length data to a text file. I have a
variable named val whose value needs to be of a fixed length, say 7
characters. How do I pad the val variable with leading zero's so that
the length of the value stored in the variable is 7.


Example:


set rdg $val
where val contains '123'


I need to pad val so that it looks like '0000123'
Hope I have made myself clear.


Regards,
Anirban Sarkar.

 

[Bong]

Assuming the value is an integer, use
format %07i $val or
set val [format %07i $val]

Bob Rashkin
rrashkin@csc.com

 

[anirban2k2001]

Thanks once again, Bong