diff options
author | Robin Barker <RMBarker@cpan.org> | 2007-10-05 13:12:05 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-10-05 11:45:25 +0000 |
commit | fbc891ce838d50f87f51648f1bf049f1eb5cda7a (patch) | |
tree | 1d66bc571a3d2821d3b53872b3e717c5d337fbd7 /t | |
parent | 1df59df4ebcab37761aa39263671effe1aa83486 (diff) | |
download | perl-fbc891ce838d50f87f51648f1bf049f1eb5cda7a.tar.gz |
New [PATCH] use 5.006; use 5.10.0
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <2C2E01334A940D4792B3E115F95B7226016048DB@exchsvr1.npl.ad.local>
p4raw-id: //depot/perl@32031
Diffstat (limited to 't')
-rw-r--r-- | t/lib/warnings/pp_ctl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/t/lib/warnings/pp_ctl b/t/lib/warnings/pp_ctl index d27e8963f4..923d54cf10 100644 --- a/t/lib/warnings/pp_ctl +++ b/t/lib/warnings/pp_ctl @@ -240,3 +240,20 @@ use warnings; eval 'print $foo'; } EXPECT +######## +# pp_ctl.c +use warnings; +eval 'use 5.006; use 5.10.0'; +EXPECT +######## +# pp_ctl.c +use warnings; +eval '{use 5.006;} use 5.10.0'; +EXPECT +v-string in use/require non-portable at (eval 1) line 2. +######## +# pp_ctl.c +use warnings; +eval 'use vars; use 5.10.0'; +EXPECT +v-string in use/require non-portable at (eval 1) line 2. |