perp test