diff options
| author | Nicholas Clark <nick@ccl4.org> | 2012-01-04 11:36:25 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2012-01-06 16:14:14 +0100 |
| commit | 410c1a5e7498757c39d2940d00926fe55b54a3b6 (patch) | |
| tree | c6a7e29ab15c5802ca57f025ab268531d5695aec /t/lib/strict/refs | |
| parent | 27a7e72b1a90477d91cc29749006be0d6ce6b9cb (diff) | |
| download | perl-smoke-me/deprecate-any-defined-array.tar.gz | |
defined(@array) now also warns for package variables.smoke-me/deprecate-any-defined-array
Diffstat (limited to 't/lib/strict/refs')
| -rw-r--r-- | t/lib/strict/refs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/lib/strict/refs b/t/lib/strict/refs index 09b962f71b..d9bff7cd84 100644 --- a/t/lib/strict/refs +++ b/t/lib/strict/refs @@ -322,6 +322,8 @@ use strict 'refs'; my $x = "foo"; defined @$x; EXPECT +defined(@array) is deprecated at - line 4. + (Maybe you should just omit the defined()?) Can't use string ("foo") as an ARRAY ref while "strict refs" in use at - line 4. ######## # [perl #37886] strict 'refs' doesn't apply inside defined |