my ($addr, $bits, $network, $mask) = split("/", $cidr);
$network = $network * 256 + $_ foreach(split(/\./, $addr);
$mask = eval '0b'.('1' x $bits).('0' x (32 - $bits));
print int2ip($network & $mask)."\t".int2ip($mask)."\n";