135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added undef checking in os_*()

Browse Source
This commit is contained in:
Max Baker
2003-05-27 15:38:59 +00:00
parent e448915e0b
commit 2e03e3faca
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Info/Layer2/Bay.pm
View File

@@ -80,6 +80,7 @@ sub os {
sub os_ver { sub os_ver {
my $bay = shift; my $bay = shift;
my $descr = $bay->description(); my $descr = $bay->description();
return undef unless defined $descr;
# 303 / 304 # 303 / 304
if ($descr =~ m/Rev: \d+\.\d+\.\d+\.\d+-(\d+\.\d+\.\d+\.\d+)/){ if ($descr =~ m/Rev: \d+\.\d+\.\d+\.\d+-(\d+\.\d+\.\d+\.\d+)/){
@@ -96,6 +97,7 @@ sub os_ver {
sub os_bin { sub os_bin {
my $bay = shift; my $bay = shift;
my $descr = $bay->description(); my $descr = $bay->description();
return undef unless defined $descr;
# 303 / 304 # 303 / 304
if ($descr =~ m/Rev: \d+\.(\d+\.\d+\.\d+)-\d+\.\d+\.\d+\.\d+/){ if ($descr =~ m/Rev: \d+\.(\d+\.\d+\.\d+)-\d+\.\d+\.\d+\.\d+/){