[easy] file size - tcl