|
|
| "be consistent" | |
| PerlMonks |
Re: Re: Merge CIDRsby merlyn (Sage) |
| on Oct 15, 2001 at 01:44 UTC ( [id://118800]=note: print w/replies, xml ) | Need Help?? |
This is an archived low-energy page for bots and other anonmyous visitors. Please sign up if you are a human and want to interact.
You need to sort by start address. You're lucky that your input data was already sorted by such.
Also, you have to look for $rs <= $ce + 1 rather than $rs == $ce + 1, or you end up not coalescing things like 0-7 (0.0/3), 4-7 (4.0/2), which should just get swallowed. -- Randal L. Schwartz, Perl hacker
In Section
Cool Uses for Perl
|
|
||||||||||||||||||||||||||||