This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Create new testing helper file
authorKarl Williamson <khw@cpan.org>
Tue, 27 May 2014 03:05:21 +0000 (21:05 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 31 May 2014 16:09:47 +0000 (10:09 -0600)
commit173ee337ccae1a3f75728b24e42392c298525e81
tree3c900f5af3361f5b42e8898df80db0e47653560c
parent6deb7a5e3707524fd23c0080d6a762ff30e50494
Create new testing helper file

This adds t/charset_tools.pl, and populates it with 2 functions removed
from t/test.pl.  The functions are changed very slightly to use the
variables $::IS_ASCII and $::IS_EBCDIC instead of recalculating this
information.

A new function byte_utf8a_to_utf8n() is also placed in charset_tools.
This takes the bytes that form a (ASCII-platform) UTF-8 string and
convert them to the bytes that form that string on the native platform,
hence just returns the input if run on an ASCII platform.
MANIFEST
lib/unicore/mktables
t/charset_tools.pl [new file with mode: 0644]
t/lib/common.pl
t/op/chop.t
t/op/index.t
t/op/lc.t
t/re/fold_grind.t
t/re/pat_advanced.t
t/re/reg_fold.t
t/test.pl