Select Code to Download

            open( MAIL, "| $sendmail -t" );
            print MAIL "To: $_\n";
...
            close(MAIL);

            print "Email was sent to: $_!<br>";