Further refactor rpn2perl()