Created by [CecilWesterhof].

Sometimes you have a string with unprintable characters and you like to know what those characters are. For this I wrote the following function:

======
proc displayStringAsInts {string} {
    foreach c [split ${string} ""] {
        set char [scan ${c} %c]
        puts [format "%4d | %c" ${char} ${char}]
    }
}
======

When calling it like:
======
displayStringAsInts "…¢€≠±¥"
======

This gives:
======
8230 | …
 162 | ¢
8364 | €
8800 | ≠
 177 | ±
 165 | ¥
======

----

As always: comments, tips, questions and request are appreciated.

<<categories>>Utilities