jperldoc: Fix bug