Re: [PATCH] length of undefined $(digit) should warn

Message-ID: <20020116134339.A704@rafael>

(replaces #14302)

p4raw-id: //depot/perl@14303

diff --git a/t/lib/warnings/mg b/t/lib/warnings/mg
index 6c9e271..2190638 100644 (file)
--- a/t/lib/warnings/mg
+++ b/t/lib/warnings/mg
@@ -45,7 +45,13 @@ EXPECT
 ########
 # mg.c
 use warnings 'uninitialized';
-'foo' =~ /(b)(a)(r)/;
+'foo' =~ /(foo)/;
 length $3;
 EXPECT
 Use of uninitialized value in length at - line 4.
+########
+# mg.c
+use warnings 'uninitialized';
+length $3;
+EXPECT
+Use of uninitialized value in length at - line 3.