perl constant-boolean constant::boolean