esmith::util::network - miscellaneous network utilities
In a root terminal you can do the command below if you want to display the up-to-date content
perldoc esmith::util::network
use esmith::util::network qw(:all);
or
use esmith::util::network qw(the functions you want); my $ip = cleanIP($orig_ip); my $is_valid = isValidIP($ip); my $is_valid = isValidPort($port);
This is a collection of generally useful functions for working with IP addresses.
Functions are exported only on request.
my $ip = cleanIP($orig_ip);
If the $orig_ip is valid it will be cleaned up into a cannonical form, stripping any padding zeros and such.
my $is_valid = isValidIP($ip);
Returns the IP given if $ip is a properly formatted IP address, undef otherwise.
my $is_valid = isValidPort($port);
Returns true if $port is a properly formatted port, false otherwise.
Performs a cmp operation on two IP addresses.
This function returns true if it is passed a valid RFC 921 hostname, false otherwise.
This validation function validates an email address, using the Mail::RFC822::Address module. Additionally, by default, it permits a local address instead of a fully-qualified remote address, even checking the existence of said user in the accounts db.
If you don't wish to permit local addresses, pass the permitlocal option as false.
ie.
esmith::util::isValidEmail($address, { permitlocal => 0 })
Mitel Networks Corp.