Definitions.
INT        = [0-9_]+
NAME       = [a-zA-Z_][a-zA-Z0-9_]*
WHITESPACE = [\s\t\r]
COMMENT    = #[^\n]*\n?
BREAK      = [\n;;]

Rules.
\+            : {token, {'+',  TokenLine}}.
\-            : {token, {'-',  TokenLine}}.
\*            : {token, {'*',  TokenLine}}.
\/            : {token, {'/',  TokenLine}}.
\=            : {token, {'=',  TokenLine}}.
\(            : {token, {'(',  TokenLine}}.
\)            : {token, {')',  TokenLine}}.
!             : {token, {'!',  TokenLine}}.
\^            : {token, {'^',  TokenLine}}.
{BREAK}+      : {token, {break,  TokenLine}}.
{NAME}        : {token, {var, TokenLine, TokenChars}}.
{INT}         : {token, {int,  TokenLine, TokenChars}}.
{WHITESPACE}+ : skip_token.
{COMMENT}+    : skip_token.

Erlang code.