Adding lexer perl script
Nearly finished hacked perl lexer.