Evaluated proc said {nick msg} {join [regexp -all -inline "^<$nick>.+?$msg\(.+)*\n" [irclog 100]] "\n--------\n"}