diff options
author | John Peacock <jpeacock@rowman.com> | 2001-09-24 13:29:03 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-25 17:20:38 +0000 |
commit | e3407aba2c52ce8e302b2dc706d0837bc82c537f (patch) | |
tree | 5ccb82ae580e805db2d049e3222233eec0804574 /t/lib | |
parent | fcfd4d79aacf88b6c1a70618d4cb5c1133827db7 (diff) | |
download | perl-e3407aba2c52ce8e302b2dc706d0837bc82c537f.tar.gz |
warning on v-string in use/require
Message-ID: <3BAFA59F.9C0E0339@rowman.com>
p4raw-id: //depot/perl@12205
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/warnings/pp_ctl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/t/lib/warnings/pp_ctl b/t/lib/warnings/pp_ctl index ac01f277b1..59ced2b446 100644 --- a/t/lib/warnings/pp_ctl +++ b/t/lib/warnings/pp_ctl @@ -222,6 +222,18 @@ EXPECT Use of uninitialized value 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; { no warnings; |