Definitions.
STRING	= [a-zA-ZqQ]+
Rules.

[\t\s]+ : skip_token.
{STRING} : {token, {word, TokenLine, TokenChars}}.
[;] : {token, {semicolon, TokenLine, TokenChars}}.
[\.] : {token, {period, TokenLine, TokenChars}}.

Erlang code.