HaskellでJSON文字列を解析する

Question

私はサーバーからJSON文字列を取り出し、解析し、データで何かをする単純なHaskellプログラムに取り組んでいます。具体的な内容は現時点では適切ではありませんが、私が抱えている問題は返されたJSONを解析することです。

JSON文字列をサーバからIO Stringタイプとして返​​します。その文字列をJSONオブジェクトに解析する方法を理解できていないようです。

助けを借りていただければ幸いです。

ここまでは私のコードです。

import Data.Aeson 
import Network.HTTP 

main = do 
    src <- openURL "http://www.reddit.com/user/chrissalij/about.json" 
    -- Json parsing code goes here 

openURL url = getResponseBody =<< simpleHTTP (getRequest url) 

注：私はそれを推奨しているように見えるものですと、しかし、私は別のライブラリを使用して喜ん以上になると思い例でData.Aesonを使用しています。

また、このコードの一部または全部を変更することができます。

Answer 1

Data.Aesonは、Attoparsecで使用するように設計されているため、ParserというAttoparsecで使用する必要があります。また、AttoparsecはByteStringで作業することを好むので、Stringの代わりにByteStringの結果を得るには、要求がわずかに変更されなければなりません。

これは動作するようです：

import Data.Aeson 
import Data.Attoparsec 
import Data.ByteString 
import Data.Maybe 
import Network.HTTP 
import Network.URI 

main = do 
    src <- openURL "http://www.reddit.com/user/chrissalij/about.json" 
    print $ parse json src 

openURL :: String -> IO ByteString 
openURL url = getResponseBody =<< simpleHTTP (mkRequest GET (fromJust $ parseURI url)) 

ここ

私は単なるValueとしてJSONを解析されてきましたが、あなたはおそらく、独自のデータ型を作成し、それを処理するためにためFromJSONインスタンスを書きたいですよ変換はきちんとしています。