代码之家 › 专栏 › 技术社区 › BugShotGG

如何将CLI参数组合为perl脚本中的变量

snmp command-line-interface perl

BugShotGG · 技术社区 · 7 年前

snmpget -v 1 -c xxxxxx-Ovq xx.xx.xx.xxx .1.3.6.1.2.1.1.8.0

49:22:12:15.00

#!/usr/local/bin/perl

#snmpget -v 1 -c xxxxx -Ovq xx.xx.xx.xxx .1.3.6.1.2.1.1.8.0

$SNMP_GET_CMD = "snmpget -v1 -c xxxxx-Ovq";
$SNMP_TARGET = "xx.xx.xx.xxx";

my $sysORLastChange = '${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0';
chomp($sysORLastChange);
print("${SNMP_TARGET} as an Input Line Reading of ${sysORLastChange}\n");

xx.xx.xx.xxx as an Input Line Reading of ${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0

它应该返回以下内容:

xx.xx.xx.xxx as an Input Line Reading of 49:22:12:15.00

我在脚本中使用的语法有什么问题吗?

1 回复 | 直到 7 年前

stevieb 7 年前

在Perl中,使用双引号将另一个变量插入字符串。当你定义 $sysORLastChange

my $sysORLastChange = '${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0';

…正在逐字分配字符串(即,内部变量未展开)。

my $sysORLastChange = "${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0";

如果您想实际执行字符串,可以使用 qx() 运算符,也称为“backtick”样式的引号:

my $sysORLastChange = qx(${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0);

# or...

my $sysORLastChange = `${SNMP_GET_CMD} ${SNMP_TARGET} .1.3.6.1.2.1.1.8.0`;

看见 Perl Quote and Quote-like Operators perlop

推荐文章

user1498679 · OpenNMS-存储(SNMP MIB-2主机资源)提供的值不正确

6 年前

yogev levi · 如何使用AdventNet初始化snmp V3参数以获取snmpV3陷阱

7 年前

Luiz Fernando Schrickte · 如果在创建表时不知道新行索引,如何在pysnmp上启用/使用SNMPv2 RowStatus特性?

7 年前

tgreiner · 获取OID-SNMP的描述

7 年前

MaCXyLo · cisco:编写只读snmp oid的调试命令?

7 年前

mark77 · nodejs snmp打印机状态

7 年前

epiyugu · 需要支持:SNMP陷阱发送器(SNMPv3)

7 年前

Igor Nehoroshev · Zabbix SNMPv3代理发现

7 年前

BugShotGG · 如何将CLI参数组合为perl脚本中的变量

7 年前

Stéphane · 使用PySNMP的snmpwalk

7 年前