Remove the deprecated $# variable
[p5sagit/p5-mst-13.2.git] / t / lib / warnings / pp_ctl
index ac01f27..d27e896 100644 (file)
@@ -219,7 +219,19 @@ EXPECT
 use warnings;
 eval 'print $foo';
 EXPECT
-Use of uninitialized value in print at (eval 1) line 1.
+Use of uninitialized value $foo in print at (eval 1) line 1.
+########
+# pp_ctl.c
+use warnings 'portable';
+eval 'use 5.6.1';
+EXPECT
+v-string in use/require non-portable at (eval 1) line 2.
+########
+# pp_ctl.c
+use warnings 'portable';
+eval 'use v5.6.1';
+EXPECT
+v-string in use/require non-portable at (eval 1) line 2.
 ########
 # pp_ctl.c
 use warnings;