Integrate:

[ 18647]
Subject: Re: [perl #20606] [PATCH} openbsd hints
From: Abe Timmerman <abe@ztreet.demon.nl>
Date: Sun, 2 Feb 2003 18:27:57 +0100
Message-Id: <200302021827.57240.abe@ztreet.demon.nl>

[ 18648]
Fix bug #8760 : cop_line isn't properly restored
when a module is loaded at runtime behind the scenes.

[ 18649]
Document the environment variable PERL_UTF8_LOCALE in perlrun.

[ 18650]
Force the C locale in makedepend, to prevent gcc from
producing locale-dependent messages.

[ 18651]
Signedness issue.

[ 18652]
Comment tweak.

[ 18653]
Fix "[perl #20667] unicode regex vs non-unicode regex".
The PL_regdata was not set up (S_cache_re()) before it
was needed (S_reginclass()).  The test put in fresh_perl.t
because we need a pristine state to start.

[ 18654]
Sync with 1.10

[ 18655]
Add the new test to MANIFEST.

[ 18656]
Better version of change #18648, by Enache Adrian
Message-ID: <20030204101533.GA11817@ratsnest.hole>

[ 18657]
Subject: [PATCH] B::Concise updates (incl. avoiding use of op_seq)
From: Stephen McCamant <smcc@mit.edu>
Date: Mon, 3 Feb 2003 21:01:07 -0500
Message-ID: <15935.7907.976943.74729@syllepsis.MIT.EDU>

[ 18658]
s/S_cache_re/cache_re/ for building with threads.

[ 18659]
Subject: [PATCH: perl@186389] fix for PerlIO/Via compilation on VMS
From: PPrymmer@factset.com
Date: Tue, 4 Feb 2003 12:03:17 -0500
Message-ID: <OFCBC6AE62.FF2B83D4-ON85256CC3.005D7A9F@factset.com>

[ 18660]
Subject: [Patch] parsing under encoding (Re: [Encode] HEADS-UP; $Encode::VERSION++ to enhance filter option)([perl #16823])
From: Inaba HIroto <inaba@st.rim.or.jp>
Date: Sat, 01 Feb 2003 21:58:20 +0900
Message-ID: <3E3BC46B.6C687CFD@st.rim.or.jp>

[ 18661]
[perl #19767] has become fixed too (by changes #18653
and #18658, methinks), adding the test(s).

[ 18662]
Add the test of [perl #8760] (fixed by change #18656).

[ 18663]
Upgrade to Encode 1.87.

[ 18664]
Things forgotten from Encode 1.87.
p4raw-link: @18664 on //depot/perl: 315b3302253fddd0350dfb87e791a1cbf5584b20
p4raw-link: @18663 on //depot/perl: 151b5d361063dc7eb9d8b6b2fdaaa3560e39071e
p4raw-link: @18662 on //depot/perl: 4f49a093e7b863c27874fb2649a6d831e6715649
p4raw-link: @18661 on //depot/perl: f119b0fbc96b5a61f080c4460880e3b51c825650
p4raw-link: @18660 on //depot/perl: 220e2d4e806a3c9c0a9f9b31667e8be830cbc55b
p4raw-link: @18659 on //depot/perl: 6efa47225d75a7e88a5d03044ee492ff6e1b7ee0
p4raw-link: @18658 on //depot/perl: 9926ca43d7a8f02d1b52caaf5e81323fa0a6a89a
p4raw-link: @18657 on //depot/perl: c27ea44e678f02a1903a4aa0e3110ba824fcd93a
p4raw-link: @18656 on //depot/perl: 834a3ffa15e23871424d94f91fd39fe77b05f76b
p4raw-link: @18655 on //depot/perl: 89af21288ea5fae338d6b860fcbee2bc26c3a116
p4raw-link: @18654 on //depot/perl: 9e7deb6ce02b084df6ef8f2d042e680bec44776d
p4raw-link: @18653 on //depot/perl: d12e50cf45149336efec3161d04293f1ae511ed7
p4raw-link: @18652 on //depot/perl: 68b871bb4a348d153c096d0edd21e3147f4c7025
p4raw-link: @18651 on //depot/perl: 7235ff25686ea87cdc817be9e231d445a360f6c1
p4raw-link: @18650 on //depot/perl: ed9a7c0a7122dbeb8157d93bb6181ffc5af79d3b
p4raw-link: @18649 on //depot/perl: acae81db257c281d4bc95e9f6550ff8d6fd2678c
p4raw-link: @18648 on //depot/perl: 7c2549db3c820cf72273bacc18a4e3d2b361563d
p4raw-link: @18647 on //depot/perl: 1ac0c030938fdadc1de87ae3d73ac10fe6533072

p4raw-id: //depot/maint-5.8/perl@18665
p4raw-branched: from //depot/perl@18646 'branch in'
	ext/List/Util/t/lln.t
p4raw-integrated: from //depot/perl@18646 'copy in'
	ext/Encode/encengine.c (@15502..)
	ext/Encode/lib/Encode/CJKConstants.pm (@15616..)
	t/lib/warnings/perlio (@16065..) ext/Encode/Byte/Byte.pm
	ext/Encode/KR/KR.pm ext/Encode/lib/Encode/Encoder.pm (@16070..)
	ext/Encode/Encode/encode.h (@16145..) makedepend.SH (@17436..)
	ext/Encode/Unicode/Unicode.pm ext/Encode/lib/Encode/Alias.pm
	(@18002..) ext/List/Util/lib/Scalar/Util.pm (@18076..)
	ext/Encode/AUTHORS (@18175..) ext/List/Util/ChangeLog
	ext/List/Util/lib/List/Util.pm (@18292..) ext/Encode/Changes
	ext/Encode/encoding.pm ext/Encode/t/enc_eucjp.t (@18559..)
	ext/PerlIO/via/via.xs (@18583..) hints/openbsd.sh (@18602..)
	lib/utf8.t (@18603..) t/uni/tr_7jis.t (@18622..)
	ext/MIME/Base64/Base64.xs (@18642..) t/op/pat.t (@18652..)
	t/run/fresh_perl.t (@18653..) ext/Encode/Encode.pm
	ext/Encode/Encode.xs ext/Encode/lib/Encode/Encoding.pm
	ext/Encode/lib/Encode/JP/JIS7.pm (@18660..)
	ext/Encode/Unicode/Unicode.xs ext/Encode/t/CJKT.t (@18663..)
	'merge in' ext/B/t/concise.t (@18116..) ext/B/B/Concise.pm
	(@18118..) pod/perlapi.pod (@18530..) pod/perlrun.pod
	(@18536..) ext/List/Util/Util.xs (@18541..) embed.fnc embed.h
	global.sym (@18551..) sv.c (@18616..) toke.c (@18621..)
	MANIFEST (@18642..) op.c (@18648..) regexec.c (@18653..)

1 files changed, 19 insertions, 2 deletions

diff --git a/t/op/pat.t b/t/op/pat.t
index 360892bc4c..fe70e12725 100755
--- a/t/op/pat.t
+++ b/t/op/pat.t
@@ -6,7 +6,7 @@
 
 $| = 1;
 
-print "1..986\n";
+print "1..988\n";
 
 BEGIN {
     chdir 't' if -d 't';
@@ -3090,6 +3090,23 @@ ok("bbbbac" =~ /$pattern/ && $1 eq 'a', "[perl #3547]");
     ok( $1 ne "\xC4\x80", '$1 is not non-utf-8' );
 }
 
-# last test 984
+{
+    use utf8;
+    my $attr = 'Name-1' ;
+
+    my $NormalChar          = qr/[\p{IsDigit}\p{IsLower}\p{IsUpper}]/;
+    my $NormalWord          = qr/${NormalChar}+?/;
+    my $PredNameHyphen      = qr/^${NormalWord}(\-${NormalWord})*?$/;
+
+    $attr =~ /^$/;
+    ok( $attr =~ $PredNameHyphen, "[perl #19767] original test" );
+}
+
+{
+    use utf8;
+    "a" =~ m/[b]/;
+    ok ( "0" =~ /\p{N}+\z/, "[perl #19767] variant test" );
+}
 
+# last test 988