Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re^2: SNMP problems

by ribasushi (Monk)
on Sep 11, 2007 at 22:05 UTC ( #638446=note: print w/ replies, xml ) Need Help??


in reply to Re: SNMP problems
in thread SNMP problems

Here is my complete test script:

#!/usr/bin/perl use warnings; use strict; use SNMP; use Data::Dumper; $Data::Dumper::Useqq = 1; my $switchaddr = '<SET_ME>'; my $community = '<SET_ME>'; my $snmp = SNMP::Session->new ( DestHost => $switchaddr, Community => $community, Version => '2c', ) or die "Unable to connect to $switchaddr\n"; for my $oid (qw/ .1.3.6.1.2.1.2.2 .1.3.6.1.2.1.17.4.3.1.1 /) { print "\nTrying snmpwalk on $oid\n=========================\n"; print scalar `snmpwalk -O n -v 2c -c $community $switchaddr $oid`; print "\nTrying SNMP->gettable on $oid\n=========================\ +n"; my $response; eval { $response = $snmp->gettable ($oid) }; if ($@) { print "FAILED: $@\n"; } else { print Dumper $response; } }

and here is the result.


Comment on Re^2: SNMP problems
Download Code
Re^3: SNMP problems
by andyford (Curate) on Sep 12, 2007 at 10:46 UTC

    Wow, ran your code and still got no results from gettable() for either OID but my snmpwalk results look great. I'm using perl 5.8.5 and SNMP 5.1.2 on Linux. How 'bout you?

    Update: fixed version and module name

    non-Perl: Andy Ford

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://638446]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (10)
As of 2014-10-01 17:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    What is your favourite meta-syntactic variable name?














    Results (31 votes), past polls