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