Posted to tcl by jima at Fri Jun 02 10:08:06 GMT 2017view pretty
proc -> {value listOfCommands} { set buff $value foreach command $listOfCommands { set buff "\[$command $buff\]" } return $buff } -> {1 2 3} {first {times 10}} # [times 10 [first 1 2 3]]