if $2 == JOIN {
sockwrite -nt $sockname privmsg #opers : $iif($read(kanal.txt,w,$right($3,-1)),var,yok)
}