Evaluated proc + args {set result [regexp -inline {^<(@| |+)*(.+?)> (.+?)$} [join ${args}]];. $result}