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

Fix uptime fetching code.

Browse Source 
Minor documentation fixes.
This commit is contained in:
Bill Fenner
2007-02-15 21:49:59 +00:00
parent 70197f35ee
commit 0dc9174c83
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Info/Layer3/NetSNMP.pm
View File

@@ -32,7 +32,7 @@ use Exporter;
use SNMP::Info::Layer3; use SNMP::Info::Layer3;
use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE $INIT/ ; use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %MUNGE $INIT/ ;
$VERSION = '1.04'; $VERSION = '1.05';
@SNMP::Info::Layer3::NetSNMP::ISA = qw/SNMP::Info::Layer3 Exporter/; @SNMP::Info::Layer3::NetSNMP::ISA = qw/SNMP::Info::Layer3 Exporter/;
@SNMP::Info::Layer3::NetSNMP::EXPORT_OK = qw//; @SNMP::Info::Layer3::NetSNMP::EXPORT_OK = qw//;
@@ -97,7 +97,7 @@ sub uptime {
my $netsnmp = shift; my $netsnmp = shift;
my $uptime; my $uptime;
$uptime = $ucd->hrSystemUptime(); $uptime = $netsnmp->hrSystemUptime();
return $uptime if defined $uptime; return $uptime if defined $uptime;
return $netsnmp->SUPER::uptime(); return $netsnmp->SUPER::uptime();
@@ -182,7 +182,7 @@ These are methods that return scalar value from SNMP
=item $netsnmp->vendor() =item $netsnmp->vendor()
Returns 'Net-SNMP' and the Net-SNMP version. Returns 'Net-SNMP'.
=item $netsnmp->os() =item $netsnmp->os()
@@ -190,7 +190,8 @@ These are methods that return scalar value from SNMP
=item $netsnmp->os_ver() =item $netsnmp->os_ver()
Returns the software version extracted from sysDescr. Returns the software version extracted from sysDescr, along
with the Net-SNMP version.
=item $netsnmp->uptime() =item $netsnmp->uptime()