Date: Fri, 27 Dec 2002 14:41:39 +0800 (CST) From: plasma <plasma@freebsd.sinica.edu.tw> To: FreeBSD-gnats-submit@FreeBSD.org Subject: ports/46554: fix a regex bug dealing with utf8 strings on perl 5.8 Message-ID: <20021227064139.2567F4DB@freebsd.sinica.edu.tw>
next in thread | raw e-mail | index | archive | help
>Number: 46554 >Category: ports >Synopsis: fix a regex bug dealing with utf8 strings on perl 5.8 >Confidential: no >Severity: serious >Priority: low >Responsible: freebsd-ports >State: open >Quarter: >Keywords: >Date-Required: >Class: sw-bug >Submitter-Id: current-users >Arrival-Date: Thu Dec 26 22:50:00 PST 2002 >Closed-Date: >Last-Modified: >Originator: plasma >Release: FreeBSD 4.7-PRERELEASE i386 >Organization: >Environment: System: FreeBSD freebsd.sinica.edu.tw 4.7-PRERELEASE FreeBSD 4.7-PRERELEASE #2: Mon Sep 9 10:45:46 CST 2002 ycheng@freebsd.sinica.edu.tw:/usr/src/sys/compile/GENERIC i386 >Description: This patch fixes a regex engine bug dealing with utf8 strings on perl 5.8. This bug has been fixed in 5.8.1 (which is not released yet). >How-To-Repeat: use utf8; utf8::upgrade($_="t.est"); s/([a-z]+)/lc($1)/ge; print "lc: $_\n"; utf8::upgrade($_="t.est"); s/([a-z]+)/uc($1)/ge; print "uc: $_\n"; utf8::upgrade($_="t.est"); s/([a-z]+)/lcfirst($1)/ge; print "lcfirst: $_\n"; utf8::upgrade($_="t.est"); s/([a-z]+)/ucfirst($1)/ge; print "ucfirst: $_\n"; reference: http://bugs6.perl.org/rt2/Ticket/Display.html?user=guest&pass=guest&id=18107 >Fix: place this patch http://freebsd.sinica.edu.tw/~plasma/patch-utf8regex under ports/lang/perl5.8/files, then reinstall perl 5.8. references: http://archive.develooper.com/perl5-changes@perl.org/msg06262.html http://archive.develooper.com/perl5-changes@perl.org/msg06276.html >Release-Note: >Audit-Trail: >Unformatted: To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-ports" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20021227064139.2567F4DB>