Perl script to generate one or more IP ranges to CIDR notation