From fc069c13f5e788149b56701d69a673dd3f3a14c8 Mon Sep 17 00:00:00 2001 From: "Eric A. Miller" Date: Mon, 12 Mar 2018 17:32:57 -0400 Subject: [PATCH] Test SNMP agent name change --- xt/10_remote_snmplabs.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/xt/10_remote_snmplabs.t b/xt/10_remote_snmplabs.t index 5aacbc46..e0260447 100644 --- a/xt/10_remote_snmplabs.t +++ b/xt/10_remote_snmplabs.t @@ -13,6 +13,7 @@ use Path::Class 'dir'; my $info = SNMP::Info->new( AutoSpecify => 1, + Debug => 1, DestHost => 'demo.snmplabs.com', Community => 'public', Version => 2, @@ -25,7 +26,7 @@ my $info = SNMP::Info->new( ok($info, 'SNMP::Info instantiated'); ok((!defined $info->error()), 'No error on initial connection'); -is($info->name(), '25', 'name is "new system name"'); +is($info->name(), '434', 'name is "new system name"'); is($info->class(), 'SNMP::Info::Layer3::NetSNMP', 'class is Layer3::NetSNMP'); done_testing;