Simple aes256 encryption and decryption script in Tcl