|
|
a0cc313f8f
|
Evaluated set ret {}; set evil_code {eval {. mwahahahaha i am doing evil}}; set the_key [rot13 $evil_code]; set thecharacter {}; foreach thecharacter $the_code thesecret $the_key {lappend ret [expr $thecharacter ^ $thesecret]}; join $ret
|
2020-09-28 21:34:37 +02:00 |
|
