Problem with <,<=

[romain]

Hello ,

I've this script

Code: Select all

for {set i 0} {$i < [lindex $a 0]} {incr i} {
     if {0 < [lindex $a 0] <=5} {
      ##blabla
        if {$i == [lindex $a 0]} {
           ##blabla 
        }
    } elseif {5 < [lindex $a 0] <= 10} {
         ##blabla
        if {$i == 5} {
         ##blabla
        } elseif {$i == [lindex $a 0]} {
          ##blabla
        }
   }   
 } 

But don't works

[Sir_Fz]

} elseif {5 < [lindex $a 0] <= 10} {

You mean

Code: Select all

} elseif {5 < [lindex $a 0] && [lindex $a 0] <= 10} {

And is [lindex $a 0] a number?

[romain]

Thx Sir_Fz.

Yes it's a number. How verifier who a list is well a list of number?

Code: Select all

regexp {\d} [split $list]

[demond]

Thx Sir_Fz.

Yes it's a number. How verifier who a list is well a list of number?

Code: Select all

regexp {\d} [split $list]

now if you get this, you deserve to work for the NSA

[romain]

Lol demond,

i write now for work for the NSA

Just, i have this code

Code: Select all

foreach d [split $list] {
  if [regexp {\d} $d] {
   putlog "$d is a number"
  } else {
   putlog"$d is not a number"
  }
 }

It's good?
If yes, it's not possible to make more simple and fast for verify if a list is just a number list

[BarkerJr]

I think you want \d+, right?

[Sir_Fz]

You can check using the string command.