Select Code to Download

open(HTMLFILE, ">pingresults.html") || die "Couldn't open pingresults\
+n";
print HTMLFILE "$HTML\n";

print HTMLFILE "This will print to file";
print "This will print to STDOUT";