open and read a file content to a variable set l_file_handle [::open $a_file r] set content [::read $l_file_handle] ::close $l_file_handle