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 | 3d3a0a8a5e7ee9abf3f3e52e1b63942b8c55a069 (patch) | |
tree | 0b9243ef82f41ad1cdfc2b934499e49615dce73d /configpm | |
parent | fd55ca4fb1e49bf9880aad1e3d9f27ace56ec139 (diff) | |
download | perl-3d3a0a8a5e7ee9abf3f3e52e1b63942b8c55a069.tar.gz |
Replace multiple 'use vars' by 'our' in utils
Using vars pragma is discouraged and has been superseded by 'our' declarations
available in Perl v5.6.0 or later.
Diffstat (limited to 'configpm')
-rwxr-xr-x | configpm | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -35,7 +35,7 @@ usage: $0 [ options ] EOF use strict; -use vars qw(%Config $Config_SH_expanded); +our (%Config, $Config_SH_expanded); my $how_many_common = 22; @@ -155,7 +155,7 @@ $config_txt .= sprintf << 'EOT', $], $export_funcs; package Config; use strict; use warnings; -use vars '%%Config', '$VERSION'; +our ( %%Config, $VERSION ); $VERSION = "%s"; @@ -469,7 +469,7 @@ $heavy_txt .= sprintf <<'ENDOFBEG', $osname, $osname, $from, $osname, $env_cygwi package Config; use strict; use warnings; -use vars '%%Config'; +our %%Config; sub bincompat_options { return split ' ', (Internals::V())[0]; |