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