Looking at your code, the following things came to mind:

• use CGI.pm - see merlyns No excuses about not using CGI.pm
• use strict & -w
• shell call to date?? try localtime
• I recommend using any of the Mail::* (or related) modules to handle mailing
• Nodes on checking for valid e-mail addresses : Email validation, Email::Valid & validate an email address ?

Greetz
Beatnik
... Quidquid perl dictum sit, altum viditur.