set randline {
  "blah blah"
  "something else"
  "spammage"
  "did i say blah already?"
  "make sure you escape " like \""
}

putserv "PRIVMSG $channel :[lindex $::randline [rand [llength $::randline]]]"