diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2003-07-17 21:33:29 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-24 08:38:35 +0000 |
| commit | 929a0744021ffa24a9c2c65030b2f147d2412c41 (patch) | |
| tree | 1a67a134e89baaf84cdbe1387644e267c37bb562 /t/lib/warnings | |
| parent | 92d1d699fbe61ae998ec027ecaa850aa8a4e9474 (diff) | |
| download | perl-929a0744021ffa24a9c2c65030b2f147d2412c41.tar.gz | |
Re: Fatal 5.8.1 error in our $FOO = x if $FOO
Message-ID: <20030717193329.GA2699@fdgroup.com>
p4raw-id: //depot/perl@20191
Diffstat (limited to 't/lib/warnings')
| -rw-r--r-- | t/lib/warnings/pad | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/t/lib/warnings/pad b/t/lib/warnings/pad index 71f683ed54..65f92c3c70 100644 --- a/t/lib/warnings/pad +++ b/t/lib/warnings/pad @@ -168,3 +168,9 @@ our $x; EXPECT "our" variable $x redeclared at - line 4. (Did you mean "local" instead of "our"?) +######## +# an our var being introduced should suppress errors about global syms +use strict; +use warnings; +our $x unless $x; +EXPECT |