if ( param() ) {
    if ( $message | $subject eq "" ) {
        print "Your subject or email content was missing.";
    }
    else {
        foreach ( sort keys(%emails) ) {
            open( MAIL, "| $sendmail -t" );
            print MAIL "To: $_";
            print MAIL "From: $adminmail";
            print MAIL "Subject: $subject\n\n";
            print MAIL "$message";
            print MAIL ".";
            close(MAIL);

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