A Perl 6 port of this module.
wcwidth takes a single codepoint and outputs its width:
wcwidth(0x3042) # "あ" - returns 2
-1for a control character
0for a character that does not advance the cursor (NULL or combining)
1for most characters
2for full width characters
wcswidth takes a string and outputs its total width:
wcswidth("*ウルヰ*") # returns 8 = 2 + 6
Returns -1 if any control characters are found.
Unlike the Python version, this module does not support getting the width of
only the first
n characters of a string, as you can use the
Thanks to Jeff Quast (jquast), the author of the Python module, which in turn is based on the C library by Markus Kuhn.