You could also do it as follows, although it's still probably not as fast as the pack/unpack method:

join '.', map { hex } $ip =~ /../g;
[download]