more whitespace cleanup
This commit is contained in:
@@ -53,7 +53,7 @@ our $index = undef;
|
|||||||
# 'ADTRAN-GENPORT-MIB' => 'adGenPort',
|
# 'ADTRAN-GENPORT-MIB' => 'adGenPort',
|
||||||
'ADTRAN-MIB' => 'adtran',
|
'ADTRAN-MIB' => 'adtran',
|
||||||
'ADTRAN-AOSUNIT' => 'adGenAOSUnitMib',
|
'ADTRAN-AOSUNIT' => 'adGenAOSUnitMib',
|
||||||
);
|
);
|
||||||
|
|
||||||
%GLOBALS = (
|
%GLOBALS = (
|
||||||
%SNMP::Info::Layer2::GLOBALS,
|
%SNMP::Info::Layer2::GLOBALS,
|
||||||
|
|||||||
@@ -222,13 +222,11 @@ sub mac {
|
|||||||
# syntax stolen from sub munge_mac in SNMP::Info
|
# syntax stolen from sub munge_mac in SNMP::Info
|
||||||
$mac = lc join( ':', map { sprintf "%02x", $_ } unpack( 'C*', $mac ) );
|
$mac = lc join( ':', map { sprintf "%02x", $_ } unpack( 'C*', $mac ) );
|
||||||
return $mac if $mac =~ /^([0-9A-F][0-9A-F]:){5}[0-9A-F][0-9A-F]$/i;
|
return $mac if $mac =~ /^([0-9A-F][0-9A-F]:){5}[0-9A-F][0-9A-F]$/i;
|
||||||
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
# MAC malformed or missing
|
# MAC malformed or missing
|
||||||
return;
|
return;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub interfaces {
|
sub interfaces {
|
||||||
|
|||||||
Reference in New Issue
Block a user