|
Posted by MH on 07/07/89 11:45
In article <1145579146.201140.152200@e56g2000cwe.googlegroups.com>,
comp.lang.tcl <phillip.s.powell@gmail.com> wrote:
>I have a TCL proc that needs to convert what might be a list into a
>string to read
>
>consider this:
>
>[set string [PROPER_CASE {hello world}]]; # OUTPUTS Hello World which
>is fine for PHP
>
>[set string [PROPER_CASE {-hello world}]]; # OUTPUT {{-Hello}}
>World, which PHP will print literally as {{-Hello}} World, instead of
>-Hello World
>
>Is there an easy way for TCL to brute-force a list into a
>strictly-string-only format to prevent this potentially ugly display
>from being displayed by PHP/etc.?
Not sure what "PROPER_CASE" does..
However, I think you want to look at the "join" command (you may need to call
it multiple times).
% set s "{{-Hello}} World"
{{-Hello}} World
% join $s
{-Hello} World
% join [join $s]
-Hello World
MH
[Back to original message]
|