diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm index 923c921363..71713a2da5 100644 --- a/systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm +++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/strict.pm @@ -1,6 +1,6 @@ package strict; -$strict::VERSION = "1.11"; +$strict::VERSION = "1.12"; my ( %bitmask, %explicit_bitmask ); @@ -154,8 +154,9 @@ exempted from this check. This disables the poetry optimization, generating a compile-time error if you try to use a bareword identifier that's not a subroutine, unless it -is a simple identifier (no colons) and that it appears in curly braces or -on the left hand side of the C<< => >> symbol. +is a simple identifier (no colons) and that it appears in curly braces, +on the left hand side of the C<< => >> symbol, or has the unary minus +operator applied to it. use strict 'subs'; $SIG{PIPE} = Plumber; # blows up |