Evaluated proc rquote {sample_size} {set quotes [lremove2 [nlsplit [strip_all [irclog_no_tcl $sample_size]]]] {} all];}