Help for this page
system ( "yourprog.tcl");
open TCL, "|tcl" or die "cannot start tcl:$!\n"; print TCL <<CODE; ... other tcl command CODE close TCL