Used Perl to generate token definitions.