lex
.
: 하픈 . 하픈 . 2 .
co.co.kr 한 .
행 ..
토 토/
%%
[\n\t ]+ ;
[a-zA-Z] { printf("%s ", yytext); }
%%
해 FSA lex 해 .
letter [-_0-9A-Za-z]
mailname {letter}({letter}|\.)*{letter}
domain_name [0-9A-Za-z][-0-9A-Za-z]*[0-9A-Za-z]
last_domain com|net|co\.kr
mail_address {mailname}@({domain_name}\.)+{last_domain}
%%
[ \t\n] ;
{mail_address} { printf("true.\n"); }
.+ { printf("false.\n"); }
%%
: 하픈 '.' . '.' . 2 .
: 하픈 . 하픈 . 2 .
zennith@zeropage:~/work/lexandyacc$ ./mailscanner asdflkhas@asdlghas.asdfkhasd.asdkjghasdf.com true. ----__--__....asdflkhasd.asdlkh@asd--asdg.co.kr true. .asdf@asgdlkh_as.comm false.----
토 토/
