Konstantin,
Recently I built a x86_64 version of perl on OS X
Show quoted text> ~/perl589-64bit/bin/perl -V | grep config
>Summary of my perl5 (revision 5 version 8 subversion 9) configuration:
> config_args='-DDEBUGGING -Doptimize=-g -pipe -Os -Dusethreads -Dusemultiplicity
-Duse64bitall -Dprefix=/Users/dankogai/perl589-64bit -des'
I tested it and worked fine. Then I got another report from ANDK
http://rt.cpan.org/Public/Bug/Display.html?id=42702
And found it should be locale to blame. 64bit arch has nothing to do with it.
I have attached rewritten version of t/01-compat.t Please tell me what happens with it.
Dan the Maintainer Thereof
#!perl -w
#
# $Id: 01-compat.t,v 0.1 2007/04/27 17:17:46 dankogai Exp dankogai $
#
# Original as URI-1.35/t/escape.t
#
use URI::Escape::XS qw/uri_escape uri_unescape/;
use Test::More tests => 7;
{
use bytes;
is uri_escape("|abc\xE5"), "%7Cabc%E5", qq{uri_escape("|abc?")};
is uri_escape("abc", "b-d"), "a%62%63", qq{uri_escape("abc", "b-d")};
ok !defined(uri_escape(undef)), qq{uri_escape(undef)};
is uri_unescape("%7Cabc%e5"), "|abc\xE5" , qq{uri_unescape("%7Cabc%e5")}; ;
is join(":", uri_unescape("%40A%42", "CDE", "F%47H")), '@AB:CDE:FGH',
qq{uri_unescape("%40A%42", "CDE", "F%47H")};
}
eval { my $escaped = uri_escape("abc" . chr(300)) };
ok !$@, qq{uri_escape("abc".chr(300)) does NOT croak};
is uri_escape(chr(0xFFF)), "%E0%BF%BF", qq{uri_escape(chr(0xFFF))};
RT for rt.cpan.org