Make a bind for !command, in the proc for the bind you connect to the db, issue an sql select command, have a loop to read the results, use putserv to send them to the channel.
More detail really depends what mysql tcl package you're using. I suggest reading the docs.