Layer3::Juniper fixed to return os_ver for JUNOS 14.x and higher
This commit is contained in:
6
Changes
6
Changes
@@ -1,5 +1,11 @@
|
||||
SNMP::Info - Friendly OO-style interface to Network devices using SNMP.
|
||||
|
||||
version 3.37 (2017-07-11)
|
||||
|
||||
[ENHANCEMENTS]
|
||||
|
||||
* Layer3::Juniper fixed to return os_ver for JUNOS 14.x and higher
|
||||
|
||||
version 3.36 (2017-06-28)
|
||||
|
||||
[ENHANCEMENTS]
|
||||
|
||||
@@ -110,15 +110,18 @@ sub layers {
|
||||
sub os_ver {
|
||||
my $juniper = shift;
|
||||
|
||||
my $descr = $juniper->description() || '';
|
||||
my $lldp_descr = $juniper->lldp_sysdesc() || '';
|
||||
my $sys_descr = $juniper->description() || '';
|
||||
my $lldp_descr = $juniper->lldp_sysdesc() || '';
|
||||
|
||||
if ( $descr =~ m/kernel JUNOS ([^,\s]+)/ ) {
|
||||
return $1;
|
||||
}
|
||||
elsif ( $lldp_descr =~ m/version\s(\S+)\s/ ) {
|
||||
return $1;
|
||||
foreach my $descr ($sys_descr, $lldp_descr) {
|
||||
if ( $descr =~ m/kernel JUNOS ([^,\s]+)/ ) {
|
||||
return $1;
|
||||
}
|
||||
elsif ( $descr =~ m/version\s(\S+)\s/ ) {
|
||||
return $1;
|
||||
}
|
||||
}
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user