하스켈 아이손 : IO 모나드에서 파서에서 값을받는 방법

Question

내가 IO에서 JSON 구문 분석을 할 노력하고있어 :

{-# LANGUAGE OverloadedStrings #-} 
import Network.HTTP.Simple 
import Data.Aeson 
import Data.Maybe (fromJust) 

main :: IO() 
main = do 
    response <- getResponseBody <$> httpJSON "http://localhost:9200" :: IO Object 
    name <- fromJust <$> response .: "name" :: Parser String 
    print "hi" 

내가 오류 얻을 : 그래서

/home/nut/dev/haskell/elastic/app/Main.hs:39:11: error: 
    • Couldn't match type ‘Parser’ with ‘IO’ 
     Expected type: IO String 
     Actual type: Parser String 
    • In a stmt of a 'do' block: 

을 어떻게 할 json 결과에서 name을 얻으시겠습니까?

parse  :: (a -> Parser b) -> a -> Result b 
parseEither :: (a -> Parser b) -> a -> Either String b 
parseMaybe :: (a -> Parser b) -> a -> Maybe b 

당신은 예를 들어,이 그렇다면 :

Answer 1

아이손은 Parser aa에에서 이동하는 기능의 무리가 있습니다

(.: "name") :: Object -> Parser String 

는 당신은 그래서 당신은 당신이 fromJust <$> 응답 '의 결과를 결합하려는 것 같습니다

{-# LANGUAGE OverloadedStrings #-} 
import Network.HTTP.Simple 
import Data.Aeson 
import Data.Maybe (fromJust) 
import Data.Aeson.Types -- new import for parseMaybe 

main :: IO() 
main = do 
    response <- getResponseBody <$> httpJSON "http://localhost:9200" 
    let name = fromJust $ parseMaybe (.: "name") response :: String 
    print "hi"