avoid warnings for undefined values

fusioninventory · May 24, 2012 · e3c876a · e3c876a
1 parent a2d0019
commit e3c876a
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/FusionInventory/Agent/Tools/Network.pm b/lib/FusionInventory/Agent/Tools/Network.pm
@@ -71,13 +71,15 @@ sub getSubnetAddressIPv6 {
 
 sub hex2canonical {
     my ($address) = @_;
+    return unless $address;
 
     my @bytes = $address =~ /^(?:0x)?(..)(..)(..)(..)$/;
     return join('.', map { hex($_) } @bytes);
 }
 
 sub alt2canonical {
     my ($address) = @_;
+    return unless $address;
 
     my @bytes = $address =~ /^(?:0x)?(..)(..)(..)(..)(..)(..)$/;
     return join(':', @bytes);