Read the contents of a file as a string

Since tcl [open filename] is a disabled command how do I read the contents of a stored file as a string?     I need to store several scripts and run eval against them. It makes more sense to ...