4 lines
189 B
Tcl
4 lines
189 B
Tcl
package require tcl 8.6
|
|
set data VG8gZXJyIGlzIGh1bWFuLCBidXQgdG8gcmVhbGx5IGZvdWwgdGhpbmdzIHVwIHlvdSBuZWVkIGEgY29tcHV0ZXIuCiAgICAtLSBQYXVsIFIuIEVocmxpY2g=
|
|
|
|
puts [binary decode base64 $data]
|