Evaluated proc test {name str args} {. $args}