Posted to tcl by pascal at Mon Mar 31 17:59:27 GMT 2014view pretty
# on OSX Create a file in the current working directory called 'testde ä ae ü ue ß ss ö oe' # and execute this script. set map [list ä ae ü ue ß ss ö oe] set msg "Grüße aus Deutschland." puts "$msg >> [string map $map $msg]" foreach file [glob testde*] { puts "$file >> [string map $map $file]" }