Select Code to Download

$VAR1 = [
          'snmp-server host 10.234.171.38 abcd
...
!snmp-server host 10.10.10.1 xyz
!'
        ];

no snmp-server host 10.234.171.38 abcd\nno snmp-server host 10.234.171
+.39 abcd\nno snmp-server host 10.234.171.40 abcd\n

$VAR1 = [
          'snmp-server host 208.234.171.38 JCIPPUBL
...
Use of uninitialized value in concatenation (.) or string at replace_e
+x10.pl line 34.

---Result 1---

my $result_1;
for (split /(?<=\n)/, $res->result()) {
...
    $result_1 .= $_;
}
print "---Result 1---\n$result_1\n\n";