dec -> hex:

my $ip = '127.0.0.1';
$ip =~ s/(\d+)/sprintf "%02X",$1/ge;
[download]

hex -> dec:

my $ip = '7F.00.00.01';
$ip =~ s/([abcdef\d]+)/hex $1/gie;
[download]

-Blake