my @output = qx(ping -c 3 $hostname);

print foreach(@file);