hastur on #exquisitebot df451a4f0e Evaluated array set -testvar2 {a b c d e f g h i j {} {} l {[]}}

2020-09-29 19:53:02 +02:00

procs

Evaluated proc NASA_GRADE_DECRYPTION {the_cipher the_key} {set ret {}; set thecharacter {}; set thesecret {}; foreach thecharacter $the_cipher thesecret [split $the_key {}] {lappend ret [format "%c" [expr $thecharacter ^ [scan $thesecret %c]]]};join $ret ""}

2020-09-28 22:16:14 +02:00

vars

Evaluated array set -testvar2 {a b c d e f g h i j {} {} l {[]}}

2020-09-29 19:53:02 +02:00

stolen-treasure.tcl

no

2020-09-27 17:24:22 +02:00

Description

No description provided

6.8 MiB

Languages

Tcl 100%