Çevrimdışı

[split $var n]

kullanimi ile aradan kaldirmak istediginiz karakterleri bolmeye yarayan 1 protokoldur, isleyisine ornek verecek olursak


Bunu oldugu gibi TCL olarak ekledigimizde bizim karsimiza cikacak sonuc bir iki uc dort olacaktir, lakin anlatmak istediginiz eger bu aradaki karakterleri kaldirmaktan ziyade birde bunlari ayri ayri yazdirmaksa bunun icin de foreach kullanman yeterli olur. Buna ornek verecek olursak

[code]
set degisken "a-b-c-d"

test ;<<< programimizi calistiriyoruz

proc test {} {
global degisken
foreach kisim [split $degisken -] {
putlog "$kisim" ;
}
}

Bu islem sonucu alt altta arada - karakteri olmadan degisken'e atanmis tum harfler dizilecektir.

__________________

Our brain is Our Weapon