Php 将验证码添加到formmail pro core.cgi

我对在邮件中添加验证码有点困惑。。我尽量不破坏主脚本中的任何内容。这就是为什么我有几个问题。我有这个MailformPro主脚本，它就在下面

sub _MAIN {
    &_ModuleLoadConfigs;
    if($ENV{'REQUEST_METHOD'} eq "POST" && $_GET{'module'} eq $null){
        $_ENV{'mode'} = 1;
        &mailformpro;
    }
    elsif($_GET{'module'} ne $null){
        $_ENV{'mode'} = 0;
        &_ModuleMode;
    }
    else {
        &mfpjs;
    }
}

sub mailformpro {
    &_RunModule('extend');
    &_COOKIE;
    &_POST;
    #@AttachedFiles = ();
    #@ResAttachedFiles = ();
    ($Serial,$InputTime,$ConfirmTime,$_ENV{'mfp_uniqueuser'}) = split(/\,/,&_LOAD($config{'file.data'}));
    &_RunModule('check');
    &_ErrorCheck;
    if(!$Error){
        &_RunModule('initialize');
        if(!$config{'disabled'}){
            &_MAINPROCESS;
        }
        &_RESULT;
    }
    else {
        &_RunModule('error');
        if($_POST{'mfp_jssemantics'}){
            &_REDIRECT("$ENV{'HTTP_REFERER'}#WarningCode${Error}");
        }
        else {
            &_Error($Error);
        }
    }
}
sub _MAINPROCESS {
    &_SETENV;
    &_RunModule('startup');
    &_MAILTEXT;
    &_RunModule('run');

    if($_POST{'mfp_testmode'}){
        @mailto = @testmailto;
        if($config{'bcc'}){
            $config{'bcc'} = $mailto[0];
        }
    }

    if($config{'mailto'} eq $null){
        $config{'mailto'} = $mailto[0];
        $config{'mailtoName'} = $mailto[0];
    }
    elsif($config{"ReturnSubject"} ne $null && $_TEXT{'responder'} ne $null){
        &_SENDMAIL($config{'mailto'},$config{'mailfrom'},$config{'fromname'},$config{"ReturnSubject"},$_TEXT{'responder'},join('',@ResAttachedFiles),$_HTML{'HTMLMail'});
    }
    if($config{'fixed'}){
        $replyTo = $config{'mailto'};
        $config{'mailto'} = $config{'mailfrom'};
        $config{'mailtoName'} = $config{'mailfrom'};
    }
    if(!$config{'mailtoName'}){
        $config{'mailtoName'} = $config{'mailto'};
    }
    for(my $cnt=0;$cnt<@mailto;$cnt++){
        &_SENDMAIL($mailto[$cnt],$config{'mailto'},$config{'mailtoName'},$config{'subject'},$_TEXT{'posted'},join('',@AttachedFiles),$_HTML{'HTMLMailAdmin'});
    }
    &_RunModule('finish');
}

sub _RESULT {
    if($_RESULT{'error'}){
        &_Error(500);
    }
    elsif($_RESULT{'html'}){
        print "Content-type: text/html;charset=UTF-8\n";
        &_SET_COOKIE;
        print $_RESULT{'html'};
    }
    elsif($_RESULT{'uri'}){
        &_REDIRECT($_RESULT{'uri'});
    }
    else {
        &_REDIRECT($config{'ThanksPage'});
    }
}

sub _ErrorCheck {
    ## Error Chec
    if(!$_POST{'mfp_jssemantics'} && $config{'DisabledJs'}){
        ## Error Code 1 / Disabled Javascript
        $Error = 1;
    }
    elsif($config{"EnglishSpamBlock"}){
        ## Error Code 2 / All English
        $Error = 2;
    }

---

然后我可以在联系方式中使用验证码。真的，在这个问题上需要帮助…

那是什么语言？它看起来不完全像PHP。

$captcha = isset($_POST['captcha']) ? $_POST['captcha'] : '';
$img_session = isset($_SESSION['img_session']) ? $_SESSION['img_session'] : '';