perldoc fix so tests pass