Tcl delivers the name of the host a script is running on through the [[info hostname]] command.

[Tclx] also has a host_info command.