putlog "blah"
if {$canais == ""} {
   putlog "variavel vazia"
   set canais $channel
} else {
   putlog "variavel ja preenchida"
   set canais "$canais $channel"
}