So this is a Tcl problem, although I am using Tcl invoked from inside Perl
An example of the problem shown by manual invoking from inside the perl debugger
<
