bind pub - !lien ::sc::lien proc ::sc::lien {nick host hand chan arg} { putserv "PRIVMSG $chan :ton lien" }