for (split /\./, $address{decimal}) {