This code looks like you have been learning out of an old (and bad) CGI book.

I know people come to sound like a broken record on this, but you would need a lot less code, and would have less room for error if you used strict.pm, CGI, and a basic templating package (there are many out there, one of the simpler ones is Text::Template. (Also see Dominus's description at his home site.)

Oh, I also note that in recent Perls there is no need to call srand any more.