egghelp/eggheads community

How to rearange data

2004-03-30T11:53:03-04:00

Heh, nice. Thanks for pointing this out user.

Statistics: Posted by caesar — Tue Mar 30, 2004 11:53 am

How to rearange data

2004-03-30T06:11:19-04:00

Yes. This provides a nice way to access variables dynamicly.

IE

Code:

set ourvar "hello"set thisvar "ourvar"puts -stdout [set $thisvar]

Mixed with the fact that Proc declarations will return the buffer of the last executed command, if no exclicit return is performed.

This is the precise reason you have to be careful if you are using RAW binds. Because if no return is used, the buffer from the last command is used. Thus.... you can often lose data because you forgot an explicit return.

Statistics: Posted by ppslim — Tue Mar 30, 2004 6:11 am

How to rearange data

2004-03-29T14:50:39-04:00

ic interesting .. so in a way ur saying if the variable exists , and u set it again then it returns the last executed string or the last string that was set .. basicly its the same as return but not entirely .. so this wouldn't break a loop and still return a value .. example ..

Statistics: Posted by Ofloo — Mon Mar 29, 2004 2:50 pm

How to rearange data

2004-03-29T14:20:54-04:00

As in is the same thing as in using "return" instead of "set" ?

Nope...check the 'proc' manual page.

If the procedure doesn't execute an explicit return, then its return value is the value of the last command executed in the procedure's body.

Statistics: Posted by user — Mon Mar 29, 2004 2:20 pm

How to rearange data

2004-03-29T13:57:59-04:00

As in is the same thing as in using "return" instead of "set" ?

Statistics: Posted by caesar — Mon Mar 29, 2004 1:57 pm

How to rearange data

2004-03-29T13:49:24-04:00

set varName ?value?

Returns the value of variable varName. If value is specified, then set the value of varName to value...

Statistics: Posted by user — Mon Mar 29, 2004 1:49 pm

How to rearange data

2004-03-29T10:35:44-04:00

TnX nice i am amazed that this doesn't give an error ..

set out

???

Statistics: Posted by Ofloo — Mon Mar 29, 2004 10:35 am

Did someone mention my name? :P

2004-03-29T06:24:48-04:00

This is about 7 times faster than the above (for short strings) in my tclsh:

Code:

proc reverse str {set out ""foreach c [split $str ""] {set out $c$out}set out}

Statistics: Posted by user — Mon Mar 29, 2004 6:24 am

How to rearange data

2004-03-29T05:10:54-04:00

Code:

proc flipstring { s } {  set newstring ""  set length [string length $s]  while { [string length $newstring] != [string length $s] } {    set newstring "$newstring[string index $s [expr $length - 1]]"    incr length -1  }  return $newstring}

there are better ways to do this so user, strikelight or ppslim might hit you up

% flip adcb
bcda
% time { flip adcb } 100
1015 microseconds per iteration

maybe some native command does it for you but i assume not since you're asking

Statistics: Posted by spock — Mon Mar 29, 2004 5:10 am

How to rearange data

2004-03-29T00:52:54-04:00

i wana rearange a string backwards ex: adcb to bcda how would i do this ? without loozing data.

ive checked lsort but it seems that this command hasn't this option..

Statistics: Posted by Ofloo — Mon Mar 29, 2004 12:52 am