Select Code to Download

  print "  <HR>\n";
  print "  <TABLE border=0 width=100% bgcolor=\"\#005533\">\n";
  print "   <TR><TD>\n";
  print "$username\n";

print <<END;
  <HR>
...
    <TR><TD>
   $username
END