tcl içindeki şu satırı
Kod: Kodu kopyalamak için üzerine çift tıklayın!
catch { exec curl -k "$::kiminsite$text" } data
bununla değiştir
Kod: Kodu kopyalamak için üzerine çift tıklayın!
catch { exec wget -O domain.html "$::kiminsite$text" }
set oku [open domain.html r]
set yaz [split [read $oku] \n]
close $oku
set data ""
foreach duzenle $yaz {
append data $duzenle
}