Re: Having problem with SPLIT

"Bryan Oakley" <oakley@bardo.clearlight.com> wrote in message
news:MFFwe.969$Ox3.533@newssvr12.news.prodigy.com...
> Earl Grieda wrote:
> > I am trying to embed a tab character into a line that gets emailed
> > to a report generator. Upon receipt of the email, I go through each
> > line of it with split since in the past emails have arrived with
> > unbalanced braces which then caused problems.
> >
> > The line I send is, \tHeader with a tab. After the split I get,
> > {\tHeader} with a tab. Another line sent without a tab, Header Without
> > a tab, is unaffected. What I want is the final line that gets passed to
> > "puts $reportFile" to be "\tHeader with a tab", but I cannot get rid of
> > the curly braces. I know this is my problem but I have run out of
ideas.
> >
> > Thanks.
> >
> >
>
> split returns a list, so maybe you need to do "puts [lindex
> $resultOfSplit 0]" to get your header? It's hard to say without seeing
> your actual code. Textual descriptions of code rarely describe the
> problem accurately.
>

Code:

if {$::DEBUG} {puts "FIRST0: $orgLine"}
set line [split $orgLine]
if {$::DEBUG} {puts "FIRST1: $line"}

DEBUG output:

FIRST0: \tHeader with a tab
FIRST1: {\tHeader} with a tab
FIRST0: Header Without a tab
FIRST1: Header Without a tab
Received on Thu Sep 29 14:23:54 2005