develooper Front page | perl.perl5.porters | Postings from January 2001

Re: One more patch for UTF8

Thread Previous | Thread Next
From:
Inaba Hiroto
Date:
January 9, 2001 09:35
Subject:
Re: One more patch for UTF8
Message ID:
3A5B4E69.B67AB309@st.rim.or.jp
Jarkko Hietaniemi wrote:

> On Tue, Jan 09, 2001 at 01:04:32AM +0900, Inaba Hiroto wrote:
> > Attached is an UTF8 patch for perl@8342.
>
> Okay, now it is applied.

Thanks.

> > Fixes `x' (pp_repeat) bug for UTF8. (pp.c)
>
> Can you give a test for this fix?

It is fix the for subst_utf8.t test #42 so when I made subst.t template
test for this will be there. But for now,

use utf8;
$_ = "\x{300}\x{400}";
s/(\w)/$1 x 2/eg;
print $_ eq ''\x{300}\x{300}\x{400}\x{400}" ? "ok\n" : "not ok\n";

will be suffice.
(But now I found if `no utf8' the script SEGVs. I will see what is
wrong.)
--
    Inaba Hitoro    <inaba@st.rim.or.jp>


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About