... 
 print header('text/html');
 print h1('Local Network: '. $addr . '/24');
 print map "$_ appears to be up<br />", @hosts
 ...