Select Code to Download

view remote-view {
    oid .1.3.6.1.2.1.80 include;
...
     y.y.y.y/32;
    }
}

#!/usr/bin/perl -w
#=====================================================================
+==========
...
    print "Please check $short_target";
}

# Set up full target name encoded as BER OID.
my @out  = unpack( "C*", "$short_origin-to-$short_target" );
...
              "$pingResultsMinRtt\.$fulltargetname",
              "$pingResultsMaxRtt\.$fulltargetname",
);

my ( $session, $error ) = ();
( $session, $error ) = Net::SNMP->session(
...
        $errormessage = "All OK";
    }

# And finally, print out the results
    print "<ErrorCode>$errorcode</ErrorCode><ErrorMessage>$errormessag
+e</ErrorMessage>\n";
...
# If the instance is merely being set up then we will not output anyth
+ing.  We will
# get results next time around.
exit 0;