wtf

wtf.erl

make_element(Src) ->                                                                 
    <img src={Src} />.                                                               
                                                                                     
digits_only(Src) ->                                                                  
    MP = /^\s*\d+\s*$/,                                                              
    re_test(Str, MP).                                                                
                                                                                     
digits_only2(Src) ->                                                                 
    Re = "^\\s*\\d+\\s*$",                                                           
    {ok,MP} = re:compile(Re),                                                        
    re_test(Str, Re).                                                                
                                                                                     
re_test(Str, MP) ->                                                                  
    case re:run(Str, MP, []) of                                                      
        {match,_} -> true;                                                           
        _ -> false                                                                   
    end.