anyone has netrange -> cidr conversion script to share?

Thu Jun 12 12:04:08 UTC 2003


Net::CIDR - Manipulate IPv4/IPv6 netblocks in CIDR notation

          use Net::CIDR;

            use Net::CIDR ':all';

            print join("\n",
                  Net::CIDR::range2cidr("192.68.0.0-192.68.255.255",
                                        "10.0.0.0-10.3.255.255"))
                       . "\n";
            #
            # Output from above:
            #
            # 192.68.0.0/16
            # 10.0.0.0/14

         ---Mike

At 11:12 PM 6/11/2003 -0700, william at elan.net wrote:

>  Does anyone here has a script (or perl procedure) for converting range
>of ips (i.e. 10.0.0.0 - 10.0.2.255) into cidr (i.e. result would be
>10.0.0.0/23,10.0.2.0/24 from the example before). If not I'll do it, I'm
>just hoping somebody is already done something this for another project...
>
>Reply off the list.
>
>--
>William Leibzon
>Elan Communications Inc.
>william at elan.net

--------------------------------------------------------------------
Mike Tancsa,                          	          tel +1 519 651 3400
Sentex Communications,     			  mike at sentex.net
Providing Internet since 1994                    www.sentex.net
Cambridge, Ontario Canada			  www.sentex.net/mike