Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
    $ip = $ip->binadd($one);
    print   "Next subnet [", $ip->ip(),        "]\n";
}

Select or download this

17:41 >perl 629_SoPW.pl

...
Next subnet [10.0.1.0]

17:41 >