RosettaCodeData/Task/Literals-String/Tcl/literals-string-2.tcl

set str {This is Tcl $::tcl_version\tIt is [clock format [clock seconds]]}
puts $str ;# ==> This is Tcl $::tcl_version\tIt is [clock format [clock seconds]]