Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
padding a space in front of a string
Neetend it up a bit... proc string_pad {orig {num 1} {char " "} {side front} } { # pad string on either side with a number of characters set pad [string repeat $char $num] switch $side { beginning - front {return $pad$orig} back - end {return $orig$pad} default {return...
