我正在尝试编写一个FromJSON实现，它将解析一个对象列表，同时跳过其中的一些对象-那些包含特定json属性的对象。
我有这样的代码，但是如果没有正确处理mzero，一旦遇到带有"exclude：真"。

newtype Response = Response [Foo]
newtype Foo = Foo Text

instance FromJSON Response where
  parseJSON = withArray "Foos" $ \arr -> do
    -- can I filter out here the ones which return `mzero`?
    foos <- mapM parseJSON arr
    pure $ Response (toList foos)

instance FromJSON Foo where
  parseJSON = withObject "Foo" $ \foo -> do
    isExcluded <- foo .: "exclude"
    if isExcluded
      then mzero
      else do
        pure $ Foo "bar"

我发现了一些提示使用parseMaybe的问题，但是我不知道如何在FromJSON定义中使用它，它似乎更适合从"外部"运行解析器。是否可以跳过"内部"？或者我在这里走错了路？