Le mardi 22 mai 2012 à 14:02 -0400, Rafael Rodriguez a écrit : > :) thanks! Was wondering how to do that.
$ perldoc Net::IP ;) That doc's a fine one to read also for other reasons. Cheers, mh > > Sent from my iPhone > > On May 21, 2012, at 9:36, Stefan Jakob <stefan.ja...@de-cix.net> wrote: > > > Am 04.05.12 03:35, schrieb Rafael Rodriguez: > >> Found this tool that works perfectly. > >> > >> http://zwitterion.org/software/aggregate-cidr-addresses/aggregate-cidr-addresses > >> > >> Hoping this'll help someone else here on the list. Thanks! > > > > Thx, this is at least three times faster than what I have here. > > > > > > Just a comment on the final print statement, which doesn't fit my needs > > for ipv6: > > > > > > - print "prefix: ", $_->prefix(), "\n"; > > + print "print: " , $_->print(), "\n"; > > > > > > - prefix: 2001:0db8:0000:0000:0000:0000:0000:0000/32 > > + print: 2001:db8::/32 > > > > > > Rgds, Stefan > > >