$mailprog = '/usr/lib/sendmail';
sub send_mail {
   open (MAIL, "|$mailprog -t -oi");
   print MAIL "To: $toemail\n";
   print MAIL "From: $fromemail\n";
   print MAIL "Subject: $thistitle\n";
   # ...
   close MAIL;
}

##</code><code>##

open FILE, "$string_from_insecure_webpage";

##</code><code>##

use CGI :standard;

# instead of...

use CGI qw{ :standard };

##</code><code>##

Versions 2.44-2.46 introduce two API changes that will affect
users of previous versions:

1) The accept() function has been renamed Accept() to avoid conflicting with
Perl's built-in function of the same name.

2) The sub() function has been renamed Sub() for similar reasons.

My apologies for these changes, but they were necessary in order for
CGI to pass the perl5.005 regression tests!