diff options
| author | Nicolas R <atoomic@cpan.org> | 2017-09-12 13:20:25 -0600 |
|---|---|---|
| committer | Todd Rinaldo <toddr@cpan.org> | 2017-11-11 01:07:18 -0600 |
| commit | fd55ca4fb1e49bf9880aad1e3d9f27ace56ec139 (patch) | |
| tree | ee4fe8e8ccd3cdef389b201a64b9863d2fcf3363 /ext/VMS-DCLsym | |
| parent | cc01160e81924fc81416f1a69e0c7c52f7c1bcf7 (diff) | |
| download | perl-fd55ca4fb1e49bf9880aad1e3d9f27ace56ec139.tar.gz | |
Replace multiple 'use vars' by 'our' in ext
Using vars pragma is discouraged and has been superseded by 'our' declarations
available in Perl v5.6.0 or later.
This commit is about replacing the usage of 'vars' pragma
by 'our' in 'ext' directory.
Diffstat (limited to 'ext/VMS-DCLsym')
| -rw-r--r-- | ext/VMS-DCLsym/DCLsym.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/ext/VMS-DCLsym/DCLsym.pm b/ext/VMS-DCLsym/DCLsym.pm index 6990e2af5a..b00b7bc765 100644 --- a/ext/VMS-DCLsym/DCLsym.pm +++ b/ext/VMS-DCLsym/DCLsym.pm @@ -2,12 +2,11 @@ package VMS::DCLsym; use Carp; use DynaLoader; -use vars qw( @ISA $VERSION ); use strict; # Package globals -@ISA = ( 'DynaLoader' ); -$VERSION = '1.08'; +our @ISA = ( 'DynaLoader' ); +our $VERSION = '1.09'; my(%Locsyms) = ( ':ID' => 'LOCAL' ); my(%Gblsyms) = ( ':ID' => 'GLOBAL'); my $DoCache = 1; |