Drop obsolete IsValidAddressOrNetwork() function.

[people/stevee/guardian.git] / modules / Base.pm

diff --git a/modules/Base.pm b/modules/Base.pm
index 194cb9692a62cb115f44b22dfc8a905847706403..1aa1d2f587d1287e337a11a7c825480db5e95b3e 100644 (file)
--- a/modules/Base.pm
+++ b/modules/Base.pm
@@ -118,23 +118,6 @@ sub FilePositions (\%\%) {
        return %new_file_positions;
 }
 
-#
-## Wrapper function for IP address and network validation.
-#
-## This wrapper function uses the external Net::IP perl module to
-## check if a given input is a valid IPv4/IPv6 address or network.
-#
-sub IsValidAddressOrNetwork ($) {
-       my $address = shift;
-
-       # Check if the address is a valid IPv4/IPv6 address or network.
-       # Return "undef" False if the address is not valid.
-       my $ip = new Net::IP ($address) || return undef;
-
-       # If we got here, the address is valid. Return True.
-       return 1;
-}
-
 #
 ## Address/Network to binary format caluculator function.
 #