Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: Perl Net::SNMP returns 1 instead of the desired outcome

by Khen1950fx (Canon)
on Oct 25, 2013 at 19:18 UTC ( #1059735=note: print w/replies, xml ) Need Help??

in reply to Perl Net::SNMP returns 1 instead of the desired outcome

I used snmpv1, blocking, and printf instead of print; also, I added DEBUG_ALL to make it more interesting:
# /usr/bin/perl use strict; use warnings; use Net::SNMP qw(:snmp DEBUG_ALL); my $OID = ''; my ( $session, $error ) = Net::SNMP->session( -hostname => shift || 'localhost', -community => shift || 'public', -version => 'snmpv1', -debug => DEBUG_ALL, ); my $result = $session->get_request( -varbindlist => [$OID], ); if ( !defined $result ) { $error = $session->error(); printf "GET_REQUEST ERROR: %s: %s\n", $session->error(); $session->close(); exit(1); } printf "The TimeTicks for host '%s' is %s\n", $session->hostname(), $result->{$OID}, "\n"; $session->close; exit(0);

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1059735]
[Discipulus]: ok.. where to look to serve a webpage composed by parts that fill themseves indipendently over time? no auto updates, just different times like (for a domain name) ip resolution, whois infos, lwp check ..

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (5)
As of 2017-11-23 08:37 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (332 votes). Check out past polls.