my $twelve_digit_str = sprintf "%03d%03d%03d%03d", split /\./, $ip_address;