print "<hr><b>base: " . $$netaddr_ref->network() "</b><br>";
my $hostnum = 0;

foreach ($$netaddr_ref->hostenum()){
 print "add$hostnum: " . $_ ."<br>";
 $hostnum++;
 }
print "<b>brdc:".$$netaddr_ref->broadcast()."</b><br><hr>";