invalid mask ..gibi bi hata ,olsa olsa tcl'de escape edilmesi gereken karakterlerle karşılaşmışsa atabilir diye düşünüyorum..
verdiğiniz snotice örneklerine dayanarak :
bu kodun en son halini kullanıyorsanız:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
set arg [string map {\[ "" \] ""} [join $arg]]
bu satırı :
Kod: Kodu kopyalamak için üzerine çift tıklayın!
set ip [string range [lindex [split [lindex [split $arg] 9] @] 1] 0 end-1]
satırının hemen üstüne yerleştirin.
[ ] tcl'de komut belirten özel karakterlerden ,sizin notice örneklerinizde bunlardan vardı.benim tahminim bunlar nedeniyle invalid* geçersiz-tanımlanmayan mask gibi bir hataya neden olmuş olabilir.
her defasında anons etme durumuysa eşyanın tabiiatına aykırı" denebilecek bi durum. şöyleki :
Kod: Kodu kopyalamak için üzerine çift tıklayın!
if {$::anons != "0"} {
diyerek koşula bağlayarak ,set anons ayarı 0 değilse yani 1 ise anons'u yap demişiz.ve bunu sadece işlem yapıldığı durumlar içersinde belirtmişiz.. o nedenle buna anlam veremiyorum...