tcl - Encode value as base64 -

I'm trying to write optimization in the List List Menager (10.2). Language is TCL, which I have very little information about us need to encode a value as base64 (or in fact, whatever obscures the query string parameter), but I can not find it how. Does TCL have a command to do this?

Your base base can be used to base64 package in hex and back in your data Use these small processes to change require Tcl> 8

  proc BIN2HEX {text} {binary scan $ text h * result; Return $ result} proc HEX2BIN {hex} {return [binary format H * $ hex]} hex [bin2hex $ yourText] set textengine [hex 2 ban $ hex]  

if you actually Base 64 requires that you can copy / paste the full base 64 file into your code only (remove the "Provides the package")