Re: Return from a subroutine generates a negative value

[LazerRed]

I'm still rather new to the module, but how about putting in some error checking?

my ( $session, $error ) = Net::SNMP->session(
         -hostname       => $host,
         -version        => '1',
         -community      => $nodes{$host}->{community}, );

if ( !defined($session) ) {
        printf("ERROR: sub snmp session undef\n");
        }

my $num = $snmp->get_request( -varbindlist =>   [$rrd{$rrd}{$type}] )

if ( !defined($num) ) {
        printf( "ERROR: %s.\n", $session->error );
        }

Oh, and the default version for Net::SNMP is v1, so you can probably remove ( -version => '1', ) from your session.

Whip me, Beat me, Make me use Y-ModemG.