bind pub - !ekle ekle
proc ekle {n u h c a} {
if { [lindex $a 0] eq "listem" } {
close [puts [open "scripts/listem.txt" a] $a]
}
}