arturo beat me to the punch, but I want to show you this anyway:

use strict;
use CGI qw(:standard :html3);

my @teamdata = qw(Business CEAC CSAM MechEng Pharmacy);
my @teamnums = (0..12);

print header,
      start_html('Some Form'),
      start_form,
      table({-border=>undef},
              caption('Some Form'),
            Tr({-align=>CENTER,-valign=>TOP},
            [
                th([qw(Data Numbers)]),
                td(
                [
                    popup_menu('data',\@teamdata),
                    popup_menu('nums',\@teamnums),
                ]),
            ]),
      ),
      end_form,
      end_html;
[download]

Use CGI - makes your code pretty and more important, maintainable!

Jeff

R-R-R--R-R-R--R-R-R--R-R-R--R-R-R--
L-L--L-L--L-L--L-L--L-L--L-L--L-L--