Evaluated foreach line [raw_irclog] { if {[regexp "$pattern" [lindex $line 3]] == 1} {, $matches $line}}