diff --git a/lib/SNMP/Info/Layer3/Scalance.pm b/lib/SNMP/Info/Layer3/Scalance.pm index b4e02bf4..07139910 100644 --- a/lib/SNMP/Info/Layer3/Scalance.pm +++ b/lib/SNMP/Info/Layer3/Scalance.pm @@ -40,18 +40,13 @@ package SNMP::Info::Layer3::Scalance; use strict; use warnings; use Exporter; +use Socket; use SNMP::Info::Layer3; use SNMP::Info::MAU; -use SNMP::Info::LLDP; -use SNMP::Info::Bridge; -use Socket; -use Data::Dumper; @SNMP::Info::Layer3::Scalance::ISA = qw/ SNMP::Info::Layer3 SNMP::Info::MAU - SNMP::Info::Bridge - SNMP::Info::LLDP Exporter /; @SNMP::Info::Layer3::Scalance::EXPORT_OK = qw//; @@ -63,8 +58,6 @@ $VERSION = '3.70'; %MIBS = ( %SNMP::Info::Layer3::MIBS, %SNMP::Info::MAU::MIBS, - %SNMP::Info::LLDP::MIBS, - %SNMP::Info::Bridge::MIBS, 'SN-MSPS-SCX-MIB' => 'snMsps', 'AUTOMATION-SYSTEM-MIB' => 'automationManufacturerId', ); @@ -72,8 +65,6 @@ $VERSION = '3.70'; %GLOBALS = ( %SNMP::Info::Layer3::GLOBALS, %SNMP::Info::MAU::GLOBALS, - %SNMP::Info::LLDP::GLOBALS, - %SNMP::Info::Bridge::GLOBALS, 'serial1' => 'automationSerialNumber.0', 'ps1_status' => 'snMspsPowerSupply1State.0', 'ps2_status' => 'snMspsPowerSupply2State.0', @@ -83,16 +74,12 @@ $VERSION = '3.70'; %FUNCS = ( %SNMP::Info::Layer3::FUNCS, %SNMP::Info::MAU::FUNCS, - %SNMP::Info::LLDP::FUNCS, - %SNMP::Info::Bridge::FUNCS, ); %MUNGE = ( # Inherit all the built in munging %SNMP::Info::Layer3::MUNGE, %SNMP::Info::MAU::MUNGE, - %SNMP::Info::LLDP::MUNGE, - %SNMP::Info::Bridge::MUNGE, ); sub layers { @@ -206,7 +193,7 @@ Christoph Handel Provides abstraction to the configuration information obtainable from a Siemens Scalance Switch via SNMP. -Tested only with sclance xr524 +Tested only with scalance xr524 =head2 Inherited Classes @@ -216,22 +203,13 @@ Tested only with sclance xr524 =item SNMP::Info::MAU -=item SNMP::Info::LLDP - -=item SNMP::Info::Bridge - - =back =head2 Required MIBs =over -=item F - -=item F - -=item F +=item F =item F @@ -239,6 +217,8 @@ Tested only with sclance xr524 =item F +=item F + =back L @@ -268,7 +248,7 @@ Returns siemens =item $scalance->model() -extrace a meaningful name from description +extract a meaningful name from description =item $scalance->mac()