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