I don't, but it was easy even before AI code.

It's this one https://en.wikipedia.org/wiki/Wish_(Unix_shell) - which turns out is Tcl.

I used it to wrap up some socat and curl. Ugly stuff. Reading values from a serial device, show on screen until a button press when a value was sent over HTTP. The kind of code you hate but the management thinks is production ready.

I found it because someone on Gentoo IRC was like: ?"if you hate yourself try this"?. Would have preferred to do the whole thing in Perl.