" } unset env(TZ) ?>

$office	" set env(TZ) "$office" hputs [ clock format $tm -format "$clockformat" ] hputs "