Select Code to Download

print "<td width=\"9%\"><b><P align=center><SELECT name=team1 size=1>\
+n";
...
print "</td>\n";
print "</b>\n";

#!/usr/local/bin/perl 
...
print "</body>";
print "</html>";