File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 6666 "XSLoader" : " 0" ,
6767 "perl" : " 5.008" ,
6868 "strict" : " 0" ,
69- "vars" : " 0"
7069 }
7170 },
7271 "test" : {
8584 "URI" : " 0" ,
8685 "perl" : " 5.008" ,
8786 "strict" : " 0" ,
88- "vars" : " 0"
8987 }
9088 }
9189 },
Original file line number Diff line number Diff line change @@ -26,7 +26,6 @@ my %WriteMakefileArgs = (
2626 " URI::URL" => 0,
2727 " XSLoader" => 0,
2828 " strict" => 0,
29- " vars" => 0
3029 },
3130 " TEST_REQUIRES" => {
3231 " Config" => 0,
@@ -39,7 +38,6 @@ my %WriteMakefileArgs = (
3938 " Test::More" => 0,
4039 " URI" => 0,
4140 " strict" => 0,
42- " vars" => 0
4341 },
4442 " VERSION" => " 3.76" ,
4543 " test" => {
@@ -70,7 +68,6 @@ my %FallbackPrereqs = (
7068 " URI::URL" => 0,
7169 " XSLoader" => 0,
7270 " strict" => 0,
73- " vars" => 0
7471);
7572
7673unless ( eval { ExtUtils::MakeMaker-> VERSION(' 6.63_03' ) } ) {
Original file line number Diff line number Diff line change 11on ' runtime' => sub {
22 requires ' strict' ;
3- requires ' vars' ;
43 requires ' Carp' ;
54 requires ' Exporter' ;
65 requires ' HTML::Tagset' ;
@@ -17,7 +16,6 @@ on 'configure' => sub {
1716
1817on ' test' => sub {
1918 requires ' strict' ;
20- requires ' vars' ;
2119 requires ' Config' ;
2220 requires ' FileHandle' ;
2321 requires ' File::Spec' ;
Original file line number Diff line number Diff line change @@ -137,7 +137,7 @@ modify it under the same terms as Perl itself.
137137
138138use strict;
139139our $VERSION = ' 3.76' ;
140- use vars qw ( %entity2char %char2entity) ;
140+ our (%entity2char , %char2entity );
141141
142142require 5.004;
143143require Exporter;
Original file line number Diff line number Diff line change @@ -89,7 +89,7 @@ our @ISA = qw(HTML::Parser);
8989use HTML::Entities ();
9090
9191use strict;
92- use vars qw( $DEBUG) ;
92+ our $DEBUG ;
9393# $DEBUG = 1;
9494our $VERSION = ' 3.76' ;
9595
Original file line number Diff line number Diff line change @@ -31,7 +31,7 @@ use strict;
3131use HTML::Tagset ();
3232
3333# legacy (some applications grabs this hash directly)
34- use vars qw( %LINK_ELEMENT) ;
34+ our %LINK_ELEMENT ;
3535*LINK_ELEMENT = \%HTML::Tagset::linkElements ;
3636
3737=over 4
You can’t perform that action at this time.
0 commit comments