#297 perl 5.28 removal of "use vars"

This commit is contained in:
Oliver Gorwits
2019-04-20 10:20:10 +01:00
parent 9b1995e90f
commit 6b70ccfd79
131 changed files with 138 additions and 140 deletions

View File

@@ -21,9 +21,9 @@ use NetAddr::IP::Lite ':lower';
@SNMP::Info::ISA = qw/Exporter/;
@SNMP::Info::EXPORT_OK = qw//;
use vars
qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD $INIT $DEBUG %SPEED_MAP
$NOSUCH $BIGINT $REPEATERS/;
our
($VERSION, %FUNCS, %GLOBALS, %MIBS, %MUNGE, $AUTOLOAD, $INIT, $DEBUG, %SPEED_MAP,
$NOSUCH, $BIGINT, $REPEATERS);
$VERSION = '3.66';
@@ -3430,7 +3430,7 @@ will inherit the Cisco Vlan module as an example.
SNMP::Info::CiscoVTP Exporter/;
@SNMP::Info::Layer2::Sample::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD $INIT $DEBUG/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD $INIT $DEBUG);
%MIBS = (%SNMP::Info::Layer2::MIBS,
%SNMP::Info::CiscoVTP::MIBS,
@@ -5002,8 +5002,6 @@ subclass.
=cut
our $AUTOLOAD;
sub AUTOLOAD {
my $self = shift;
my ($sub_name) = $AUTOLOAD =~ /::(\w+)$/;

View File

@@ -36,7 +36,7 @@ use SNMP::Info;
@SNMP::Info::AMAP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::AMAP::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info;
@SNMP::Info::AdslLine::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::AdslLine::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info;
@SNMP::Info::Aggregate::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Aggregate::EXPORT_OK = qw/agg_ports_ifstack/;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::Airespace::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Airespace::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info;
@SNMP::Info::Bridge::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Bridge::EXPORT_OK = qw//;
use vars qw/$VERSION $DEBUG %MIBS %FUNCS %GLOBALS %MUNGE $INIT/;
our ($VERSION $DEBUG %MIBS %FUNCS %GLOBALS %MUNGE $INIT);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info;
@SNMP::Info::CDP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CDP::EXPORT_OK = qw//;
use vars
our
qw/$VERSION $DEBUG %FUNCS %GLOBALS %MIBS %MUNGE $INIT %CDP_CAPABILITIES/;
$VERSION = '3.66';

View File

@@ -46,7 +46,7 @@ use SNMP::Info::IEEE802dot3ad;
agg_ports_pagp
/;
use vars qw/$DEBUG $VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($DEBUG $VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::CiscoConfig::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoConfig::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::CiscoPortSecurity::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoPortSecurity::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE %PAECAPABILITIES/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE %PAECAPABILITIES);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::CiscoPower::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoPower::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::CiscoQOS::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoQOS::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::CiscoRTT::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoRTT::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use Exporter;
@SNMP::Info::CiscoStack::ISA = qw/Exporter/;
@SNMP::Info::CiscoStack::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE %PORTSTAT/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE %PORTSTAT);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info;
@SNMP::Info::CiscoStats::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoStats::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -34,7 +34,7 @@ use Exporter;
use SNMP::Info;
use SNMP::Info::Bridge;
use vars qw/$VERSION $DEBUG %MIBS %FUNCS %GLOBALS %MUNGE %PORTSTAT $INIT/;
our ($VERSION $DEBUG %MIBS %FUNCS %GLOBALS %MUNGE %PORTSTAT $INIT);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info;
@SNMP::Info::CiscoVTP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::CiscoVTP::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -8,7 +8,7 @@ use SNMP::Info;
@SNMP::Info::DocsisHE::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::DocsisHE::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::EDP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::EDP::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info;
@SNMP::Info::Entity::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Entity::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info;
@SNMP::Info::EtherLike::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::EtherLike::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info;
@SNMP::Info::FDP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::FDP::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::IEEE802dot11::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::IEEE802dot11::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::Aggregate;
agg_ports_lag
/;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info;
@SNMP::Info::IPv6::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::IPv6::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE $METHOD/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE $METHOD);
use constant {
IPMIB => 1,

View File

@@ -37,7 +37,7 @@ use SNMP::Info;
@SNMP::Info::LLDP::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::LLDP::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info;
@SNMP::Info::Layer1::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Layer1::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer1;
@SNMP::Info::Layer1::Allied::ISA = qw/SNMP::Info::Layer1 Exporter/;
@SNMP::Info::Layer1::Allied::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer1;
@SNMP::Info::Layer1::Asante::ISA = qw/SNMP::Info::Layer1 Exporter/;
@SNMP::Info::Layer1::Asante::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::Layer2;
= qw/SNMP::Info::SONMP SNMP::Info::NortelStack SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer1::Bayhub::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer1;
@SNMP::Info::Layer1::Cyclades::ISA = qw/SNMP::Info::Layer1 Exporter/;
@SNMP::Info::Layer1::Cyclades::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer1::S3000::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer1::S3000::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -45,7 +45,7 @@ use SNMP::Info::DocsisHE;
= qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::Entity SNMP::Info::PowerEthernet SNMP::Info::LLDP SNMP::Info::DocsisHE Exporter/;
@SNMP::Info::Layer2::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::CDP;
@SNMP::Info::Layer2::3Com::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::3Com::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer2::Adtran::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Adtran::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::Aerohive::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Aerohive::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::Airespace;
= qw/SNMP::Info::Airespace SNMP::Info::CDP SNMP::Info::Bridge Exporter/;
@SNMP::Info::Layer2::Airespace::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -47,7 +47,7 @@ use SNMP::Info::IEEE802dot11;
SNMP::Info::CiscoStats SNMP::Info::CiscoConfig SNMP::Info::CDP Exporter/;
@SNMP::Info::Layer2::Aironet::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::Layer1;
@SNMP::Info::Layer2::Allied::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Allied::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::Atmedia::ISA = qw/SNMP::Info::Layer2/;
@SNMP::Info::Layer2::Atmedia::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -44,7 +44,7 @@ use SNMP::Info::Layer3;
SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer2::Baystack::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -46,7 +46,7 @@ use SNMP::Info::Layer2;
Exporter/;
@SNMP::Info::Layer2::C1900::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer2::Cisco;
@SNMP::Info::Layer2::C2900::ISA = qw/SNMP::Info::Layer2::Cisco Exporter/;
@SNMP::Info::Layer2::C2900::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::Layer2::Cisco;
= qw/SNMP::Info::CiscoStack SNMP::Info::Layer2::Cisco Exporter/;
@SNMP::Info::Layer2::Catalyst::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::SONMP;
= qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::NortelStack SNMP::Info::SONMP Exporter/;
@SNMP::Info::Layer2::Centillion::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -50,7 +50,7 @@ use SNMP::Info::Layer2;
Exporter/;
@SNMP::Info::Layer2::Cisco::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -47,7 +47,7 @@ use SNMP::Info::CDP;
SNMP::Info::CiscoStats SNMP::Info::CiscoConfig SNMP::Info::CDP Exporter/;
@SNMP::Info::Layer2::CiscoSB::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::Layer2;
/;
@SNMP::Info::Layer2::Exinda::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -48,7 +48,7 @@ use SNMP::Info::Aggregate 'agg_ports_ifstack';
/;
@SNMP::Info::Layer2::HP::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MODEL_MAP %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MODEL_MAP %MUNGE);
$VERSION = '3.66';

View File

@@ -42,7 +42,7 @@ use SNMP::Info::CDP;
SNMP::Info::CDP Exporter/;
@SNMP::Info::Layer2::HP4000::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MODEL_MAP %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %PORTSTAT %MODEL_MAP %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::LLDP;
= qw/SNMP::Info::Layer2 SNMP::Info::LLDP Exporter/;
@SNMP::Info::Layer2::HPVC::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -34,7 +34,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::Kentrox::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Kentrox::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::Airespace;
= qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::SONMP SNMP::Info::Airespace Exporter/;
@SNMP::Info::Layer2::N2270::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD $INIT $DEBUG/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE $AUTOLOAD $INIT $DEBUG);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::Layer2;
= qw/SNMP::Info::SONMP SNMP::Info::IEEE802dot11 SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::NAP222x::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Bridge;
= qw/SNMP::Info SNMP::Info::Bridge Exporter/;
@SNMP::Info::Layer2::NWSS2300::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer2::Netgear::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Netgear::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::Nexans::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Nexans::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer2;
= qw/SNMP::Info::IEEE802dot11 SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Orinoco::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::Sixnet::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Sixnet::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
= qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::LLDP Exporter/;
@SNMP::Info::Layer2::Trapeze::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::Layer3; # only used in sub mac()
= qw/SNMP::Info::IEEE802dot11 SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::Ubiquiti::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer2;
@SNMP::Info::Layer2::ZyXEL_DSLAM::ISA = qw/SNMP::Info::Layer2 Exporter/;
@SNMP::Info::Layer2::ZyXEL_DSLAM::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -52,7 +52,7 @@ use SNMP::Info::DocsisHE;
SNMP::Info Exporter/;
@SNMP::Info::Layer3::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::Aironet::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Aironet::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE/;
our ($VERSION %MIBS %FUNCS %GLOBALS %MUNGE);
$VERSION = '3.66';

View File

@@ -47,7 +47,7 @@ use SNMP::Info::LLDP;
SNMP::Info::MAU SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::AlcatelLucent::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::AlteonAD::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::AlteonAD::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::Altiga::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Altiga::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE
$int_include_vpn $fake_idx $type_class/;
$VERSION = '3.66';

View File

@@ -46,7 +46,7 @@ use SNMP::Info::Aggregate 'agg_ports_ifstack';
/;
@SNMP::Info::Layer3::Arista::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer3::Aruba::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Aruba::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,8 +40,8 @@ use SNMP::Info::Bridge;
SNMP::Info::Bridge Exporter/;
@SNMP::Info::Layer3::BayRS::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE %MODEL_MAP
%MODID_MAP %PROCID_MAP/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE %MODEL_MAP
%MODID_MAP %PROCID_MAP);
$VERSION = '3.66';

View File

@@ -34,7 +34,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::BlueCoatSG::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::BlueCoatSG::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use Exporter;
use SNMP::Info::CiscoStack;
use SNMP::Info::Layer3::CiscoSwitch;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
# NOTE : Top-most items gets precedence for @ISA
@SNMP::Info::Layer3::C3550::ISA = qw/

View File

@@ -42,7 +42,7 @@ use SNMP::Info::MAU;
Exporter/;
@SNMP::Info::Layer3::C4000::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::CiscoStack;
use SNMP::Info::Layer3::CiscoSwitch;
use SNMP::Info::MAU;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
# NOTE : Top-most items gets precedence for @ISA
@SNMP::Info::Layer3::C6500::ISA = qw/
@@ -49,7 +49,7 @@ use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
@SNMP::Info::Layer3::C6500::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer3::CheckPoint::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::CheckPoint::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -53,7 +53,7 @@ use SNMP::Info::Layer3;
Exporter/;
@SNMP::Info::Layer3::Cisco::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -43,7 +43,7 @@ use SNMP::Info::Layer3;
Exporter/;
@SNMP::Info::Layer3::CiscoASA::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::Layer3;
Exporter/;
@SNMP::Info::Layer3::CiscoFWSM::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::CiscoAgg;
use SNMP::Info::CiscoPortSecurity;
use SNMP::Info::Layer3::Cisco;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
@SNMP::Info::Layer3::CiscoSwitch::ISA = qw/
SNMP::Info::CiscoAgg
@@ -48,7 +48,7 @@ use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
@SNMP::Info::Layer3::CiscoSwitch::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::Entity;
= qw/SNMP::Info SNMP::Info::Layer3 SNMP::Info::Entity Exporter/;
@SNMP::Info::Layer3::Contivity::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -44,7 +44,7 @@ use SNMP::Info::IEEE802dot3ad 'agg_ports_lag';
/;
@SNMP::Info::Layer3::Cumulus::EXPORT_OK = qw/ agg_ports /;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer3::DLink::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::DLink::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer3::Dell::ISA = qw/SNMP::Info::LLDP SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Dell::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer3;
/;
@SNMP::Info::Layer3::ERX::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -42,7 +42,7 @@ use SNMP::Info::Layer3;
Exporter/;
@SNMP::Info::Layer3::Enterasys::EXPORT_OK = qw//;
use vars qw/$VERSION $DEBUG %GLOBALS %FUNCS $INIT %MIBS %MUNGE/;
our ($VERSION $DEBUG %GLOBALS %FUNCS $INIT %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -44,7 +44,7 @@ use SNMP::Info::EDP;
SNMP::Info::EDP Exporter/;
@SNMP::Info::Layer3::Extreme::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -36,7 +36,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::F5::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::F5::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::LLDP;
SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Force10::EXPORT_OK = qw//;
use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
= qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Fortinet::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -46,7 +46,7 @@ use SNMP::Info::LLDP;
/;
@SNMP::Info::Layer3::Foundry::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -35,7 +35,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::Genua::ISA = qw/SNMP::Info::Layer3/;
@SNMP::Info::Layer3::Genua::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -45,7 +45,7 @@ use SNMP::Info::IEEE802dot3ad 'agg_ports_lag';
agg_ports
/;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -40,7 +40,7 @@ use SNMP::Info::LLDP;
SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::HP9300::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -41,7 +41,7 @@ use SNMP::Info::IEEE802dot3ad;
/;
@SNMP::Info::Layer3::Huawei::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::LLDP;
= qw/SNMP::Info::LLDP SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::IBMGbTor::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
our ($VERSION %GLOBALS %FUNCS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -38,7 +38,7 @@ use SNMP::Info::LLDP;
@SNMP::Info::Layer3::Juniper::ISA = qw/SNMP::Info::Layer3 SNMP::Info::LLDP Exporter/;
@SNMP::Info::Layer3::Juniper::EXPORT_OK = qw//;
use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -39,7 +39,7 @@ use SNMP::Info::Layer3;
/;
@SNMP::Info::Layer3::Lantronix::EXPORT_OK = qw//;
use vars qw/$VERSION %FUNCS %GLOBALS %MIBS %MUNGE/;
our ($VERSION %FUNCS %GLOBALS %MIBS %MUNGE);
$VERSION = '3.66';

View File

@@ -49,7 +49,7 @@ use SNMP::Info::IEEE802dot3ad;
/;
@SNMP::Info::Layer3::Lenovo::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::Microsoft::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Microsoft::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

View File

@@ -37,7 +37,7 @@ use SNMP::Info::Layer3;
@SNMP::Info::Layer3::Mikrotik::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::Mikrotik::EXPORT_OK = qw//;
use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
our ($VERSION %GLOBALS %MIBS %FUNCS %MUNGE);
$VERSION = '3.66';

Some files were not shown because too many files have changed in this diff Show More