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