IRC
Как проверить содержит ли переменная цифру?
if {![catch {expr $var}]} {
# $var является числом
} else {
# $var не является числом
} if {![catch {expr $var}]} {
# $var является числом
} else {
# $var не является числом
}