Команда exec
возвращает вывод команды. Это позволяет вам установить его в переменную:
set var [exec echo "text here" | base64]
Однако, вы можете избежать echo
:
set var [exec base64 << "text here"]
А в Tcl 8.6 вы можете полностью пропустить запуск внешней программы:
set var [binary encode base64 "text here"]
Существует также кодировщик base64 в Tcllib :
package require base64
set var [base64::encode "text here"]