| Subject: | Replacement list is longer than search list warning |
Running tests shows this warning:
make test
PERL_DL_NONLAZY=1 "/usr/bin/perl" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/JISX0213.t ...... Replacement list is longer than search list at /home/test/rpmbuild/BUILD/Encode-JISX0213-0.03/blib/lib/Encode/JISX0213/CCS.pm line 181.
Replacement list is longer than search list at /home/test/rpmbuild/BUILD/Encode-JISX0213-0.03/blib/lib/Encode/JISX0213/CCS.pm line 183.
t/JISX0213.t ...... ok
t/pod.t ........... ok
t/ShiftJIS2004.t .. Replacement list is longer than search list at /home/test/rpmbuild/BUILD/Encode-JISX0213-0.03/blib/lib/Encode/JISX0213/CCS.pm line 181.
Replacement list is longer than search list at /home/test/rpmbuild/BUILD/Encode-JISX0213-0.03/blib/lib/Encode/JISX0213/CCS.pm line 183.
t/ShiftJIS2004.t .. ok
All tests successful.
It points to these two lines:
$utf8 =~ tr/\x21-\x7E/\x{FF01}-\x{FF5E}/;
$utf8 =~ tr/\x21-\x5B\x{00A5}\x5D-\x7D\x{203E}/\x{FF01}-\x{FF3B}\x{FFE5}\x{FF3D}-\x{FF5D}\x{FFE3}/;
According to <http://matrix.cpantesters.org/?dist=Encode-JISX0213+0.03>, the warning started to appear in perl 5.21.6. It was O.k. in 5.12.3.