如何在 net-snmp 代理 perl 中用字符串替换 oid

Question

我正在努力解决构建一个 snmp 代理以接收如下 snmpwalk 的问题：

NET-SNMP-TMC-MIB::nsTMCState."t​​mcd" = INTEGER: 3
NET-SNMP-TMC-MIB::nsTMCState."drecd" = INTEGER: 3
NET-SNMP-TMC-MIB::nsTMCInfo."tmcd" = ""
NET-SNMP-TMC-MIB::nsTMCInfo."drecd" = STRING: "Apps: FDPser[1]"
NET-SNMP-TMC-MIB::nsTMCErrors."tmcd" = ""
NET-SNMP-TMC-MIB::nsTMCErrors."drecd" = ""

目前，我能够得到回应：

NET-SNMP-TMC-MIB::nsTMCState.1 = 整数：3
NET-SNMP-TMC-MIB::nsTMCState.2 = 整数：3
NET-SNMP-TMC-MIB::nsTMCInfo.1 = ""
NET-SNMP-TMC-MIB::nsTMCInfo.2 = STRING：“应用程序：FDPser[1]”
NET-SNMP-TMC-MIB::nsTMCErrors.1 = “”
NET-SNMP-TMC-MIB::nsTMCErrors.2 = ""

有没有办法用 perl 做到这一点？
感谢所有回复

Answer 1

您似乎正在尝试使用 OCTET STRING 向表中添加条目 指数。你可以用谷歌搜索这些是如何被索引的，MIB 可能会 说它们是可变大小的，因此您的索引将采用以下形式：

n.subid1.subid2....subidn

其中 n 是 OCTET STRING 的长度，subidj 是 ASCII 值 OCTET STRING 中的第 j 个字符。