Add Reverse String in Tcl (#5078)

Author: pascalecu

archive/t/tcl/reverse-string.tcl

@@ -0,0 +1,9 @@
+package require Tcl 8.6
+
+if {$argc != 1} { exit }
+
+set input [lindex $argv 0]
+if {$input eq ""} { exit }
+
+puts [join [lreverse [split $input ""]] ""]
+