Select Code to Download

$ip = "10.32.$octet3.$x";
@data = `ping $ip -w 5`;

print "$ip is not available" if !grep(/^64 bytes from/,@data);