This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add functions to test.pl for easier EBCDIC testing
authorKarl Williamson <khw@khw-desktop.(none)>
Mon, 24 May 2010 16:50:13 +0000 (10:50 -0600)
committerRafael Garcia-Suarez <rgs@consttype.org>
Tue, 25 May 2010 21:06:04 +0000 (23:06 +0200)
commitf69d9fdf3f3cf041b8398a5d897daef24f0e5fa0
tree786f5c690829c3f5cdbd73bb7456cec0d9afe082
parent04518cc3f43b495f85caf2ec89c8b06540a60f8c
Add functions to test.pl for easier EBCDIC testing

This patch adds functions native_to_latin1($) and latin1_to_native($) to
test.pl.  Use of these in test scripts allows for less special case code
(or deciding to blow it off and just skip EBCDIC platforms).  If a
string is all ASCII, one has always been able to just use it and not
worry about EBCDIC.  But non-ASCII, latin1 characters have been a
different matter.  This allows one to wrap those characters in a
function call and get automatic EBCDIC compatibility.

The functions do not handle UTF-8/UTF-EBCDIC conversions.  This is more
complicated, and I was worried that that part was not appropriate for
test.pl which should use the bare minimum of Perl functionality.  These
functions use tr///, beyond what other parts of test.pl use.
t/test.pl