You could do it something like this (just a rough draft though)

foreach my $snmp_community (@snmpro) {
  if (`$snmpget $oid $snmpcommunity $rtr`) {
      process_snmpdata();
      last;
  } else {
      say "Host not responding to $snmp_community";
      next;
  }
}
[download]