fix perl compilation error with %font