Select Code to Download

print(format_ipv4, $/)
   for ($first+1 .. $broadcast-1);

print format_ip4($_);
print $/;