expected integer but got "08"



Hi!

If you do:

if {07 < 100} {
puts a
}
it works.

But if I do:
if {08 < 100} {
puts a
}
I get: expected integer but got "08"

Why is that?

I can remove the leading 0 with:

proc stripzeros {value} {
regsub ^0+(.+) $value \\1 retval
return $retval
}

But I don't understand why I get an error with 08 but 07 works.

Can someone shed some light on this for me please?
.