append newtime e0 # ...or... # append newtime . set datedif [expr $newtime - $filedt2]
See: http://wiki.tcl.tk/567