From 48d303cf8f6fb52594d68d510d28be02e6e87b12 Mon Sep 17 00:00:00 2001
From: Ramon Novoa <rnovoa@artica.es>
Date: Mon, 10 Jul 2017 12:20:23 +0200
Subject: [PATCH] Fix a warning when there are multiple empty addresses.

---
 pandora_server/lib/PandoraFMS/DataServer.pm | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/pandora_server/lib/PandoraFMS/DataServer.pm b/pandora_server/lib/PandoraFMS/DataServer.pm
index 8098f5cd69..effd0f317a 100644
--- a/pandora_server/lib/PandoraFMS/DataServer.pm
+++ b/pandora_server/lib/PandoraFMS/DataServer.pm
@@ -326,10 +326,12 @@ sub process_xml_data ($$$$$) {
 		}
 		
 		# Save the first address as the main address
-		$address = $address_list[0];
-		$address =~ s/^\s+|\s+$//g ;
-		shift (@address_list);
-}
+		if (defined($address_list[0])) {
+			$address = $address_list[0];
+			$address =~ s/^\s+|\s+$//g ;
+			shift (@address_list);
+		}
+	}
 	
 	# A module with No-learn mode (modo = 0) creates its modules on database only when it is created 
 	my $new_agent = 0;