Squawks of the Parrot

Sorry I didn't catch this earlier, but I've found at least one bug (or limitation) in the example compiler. :)

If you try something like

print 1 + 1

Then the generated code won't work.

For a quick workaround, do something like:
push @tokens, "\$P$dest = $val\n";
push @tokens, "\$P$dest = \$P$dest $oper $other_val\n";

Instead of just:
push @tokens, "\$P$dest = $val $oper $other_val\n";