- use tcl 8.5 expand operator instead of eval