实践：不同编程语言, 函数检测多属性的全部合理的具体实现。

浏览数：26 / 时间：2015年06月08日

以java和erlang为例:

①、java：面向对象且存在return。

②、erlang: 函数性编程不存在return

%% 模拟检测多个输入信息是否合理，只要有一个不合理,则返回。

%% 举例:UName,UEmail,UPass,USex,UMoney,UOwn.
%% 以上述描述的顺序为检测的优先级,检测函数: 以check为前缀加要检测的属性名字。

%% java：存在return，直接使用return。
%% 方法一:

regist(UName,UEmail,UPass,USex,UMoney,UOwn)
 
{
 
    if(!checkName(UName))
    {
        return 
;
    }
 
    if(!checkEmail(UEmail))
    {
        return 
;
    }
 
    if(!checkPass(UPass))
    {
        return 
;
    }
 
    if(!checkSex(USex))
    {
        return 
;
    }
 
    if(!checkMoney(UMoney))
    {
        return 
;
    }
 
    if(!checkOwn(UOwn))
    {
        return 
;
    }
}

%% 在erlang中不存在return:
%% 方法二、

regist(UName,UEmail,UPass,USex,UMoney,UOwn)->
    case 
checkName(UName)
    of 
        ok->
             
            case
                checkEmail(UEmail)
            of 
                ok->
                    case 
checkPass(UPass)
                    of                  
                    ok->
                        case 
checkSex(USex)
                        of
                        ok->
                            case
                            of
                                ok->
                                    case 
checkMoney(UMoney)
                                    of
                                        ok-> 
                                            case
                                                checkOwn(UOwn)
                                            of
                                                ok-> 
                                                    ok;
                                                error-> 
                                                    error 
                                            end
                                        ;
                                        error-> error
                                    end
                                ;
                                error-> 
                                    error
                            end
                        ;
                        error-> error
                        end
                    ;
                    error->error 
                    end
                ;
            error->
                error
            end
            ;
        error->error
    end
.

%% 方案三、

regist(UName,UEmail,UPass,USex,UMoney,UOwn)->
    NameResult = checkName(UName),%% 返回值:0,1
    EmailResult =checkEmail(UEmail,NameResult),
    PassResult = checkPass(UPass,EmailResult),
    SexResult = checkSex(USex,PassResult),
    MoneyResult = checkMoney(UMoney,SexResult),
    checkOwn(UOwn,MoneyResult).
     
%% 通过名字验证后才能进行邮箱验证，否则直接放回名字验证的结果。
checkEmail(UEmail,1)->
    Result;
checkEmail(UEmail,NameResult)->
    NameResult;