This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
lib/locale.t: Improve debug output
authorKarl Williamson <public@khwilliamson.com>
Thu, 15 Aug 2013 18:42:46 +0000 (12:42 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 15 Aug 2013 22:49:31 +0000 (16:49 -0600)
commit019bf7ddbf98ff5a26ce4bfdfc5688089f08b350
treeefa1c3204cb5fb09bd3cee25e28c15513045681c
parentfc81f5f28c678b1064c14fcf056ef290321bd886
lib/locale.t: Improve debug output

This creates a function to display a list of code points that are passed
in.  It uses hex for non-ASCII graphics and otherwise outputs the
characters, perhaps as ranges.  It makes reading the output a lot
easier.  Previously, there could be discrepancies in if the output was
in utf8 vs what the file handle thought, and even when there was no
such discrepancy, the upper Latin1 characters were displayed as if the
locale is Latin1, which it likely wasn't, so the graphics were
misleading.
lib/locale.t