Add preceding zero to perl IP string ### Add preceding zero to IP address so that the address is 192.058, not 192.58 $IP=~s/(\d+)/substr”00$1″,-3/eg;