Select Code to Download

use Net::SNMP qw(:asn1);
...
# remove quotes from OCTET_STRING, it's a constant.
my @oids = ($svSvcName, OCTET_STRING, $message);

# snmptrapd -f -P
2003-09-23 15:20:06 NET-SNMP version 5.0.6 Started.
...
2003-09-23 15:21:08 192.168.254.1(via 192.168.254.1) TRAP, SNMP v1, co
+mmunity public
        SNMPv2-SMI::enterprises Enterprise Specific Trap (0) Uptime: 0
+:00:00.00
        SNMPv2-SMI::enterprises.77.1.2.3.1.1 = STRING: "THIS IS AN SNM
+P TEST"