my $hex_ip = join '', map { sprintf("%02x", $_) } $ip =~ m/\d+/g;




-----------------------------------------------------------------------------
Copyright 1997-2025 Jeffrey Friedl