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

New global

Browse Source
This commit is contained in:
Eric A. Miller
2012-11-27 22:39:25 -05:00
parent ecea4ef4a4
commit f2d9f6be27
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Info/Layer3/Foundry.pm
View File

@@ -65,6 +65,7 @@ $VERSION = '2.08';
'ps1_type' => 'snChasPwrSupplyDescription.1', 'ps1_type' => 'snChasPwrSupplyDescription.1',
'ps1_status' => 'snChasPwrSupplyOperStatus.1', 'ps1_status' => 'snChasPwrSupplyOperStatus.1',
'fan' => 'snChasFanOperStatus.1', 'fan' => 'snChasFanOperStatus.1',
'img_ver' => 'snAgImgVer',
); );
@@ -165,7 +166,7 @@ sub vendor {
sub os_ver { sub os_ver {
my $foundry = shift; my $foundry = shift;
return $foundry->snAgImgVer() if ( defined $foundry->snAgImgVer() ); return $foundry->img_ver() if ( defined $foundry->img_ver() );
# Some older ones don't have this value,so we cull it from the description # Some older ones don't have this value,so we cull it from the description
my $descr = $foundry->description(); my $descr = $foundry->description();
@@ -399,6 +400,12 @@ Returns the status of the chassis fan.
(C<snChasFanOperStatus.1>) (C<snChasFanOperStatus.1>)
=item $foundry->img_ver()
Returns device image version.
(C<snAgImgVer.0>)
=back =back
=head2 Global Methods imported from SNMP::Info::Layer3 =head2 Global Methods imported from SNMP::Info::Layer3