Scottyを使用してフロントエンドにHTTP GETリクエストからの応答を表示するにはどうすればよいですか？

Question

私は初めてScottyを試しています。私はGETリクエストを過去にすることができません。レスポンスは、私はスコッティによって出力することができますが、私はそれを行う方法を見つけ出すことはできませんタイプに変換する必要があります知っているタイプ

IO (Response bytestring-0.10.8.1:Data.ByteString.Lazy.Internal.ByteString) 

として返されます。

私の完全なコードは次のとおりです。

{-# LANGUAGE DeriveGeneric  #-} 
{-# LANGUAGE OverloadedStrings #-} 
module Main where 

import   Control.Lens 
import   Control.Monad.IO.Class 
import   Data.Aeson    (FromJSON, ToJSON, Value, decode, 
             encode) 
import   Data.Map    as Map 
import   GHC.Generics 
import   Lib 
import   Network.Wreq   as Wreq 
import   Web.Scotty    as Scotty 

main :: IO() 
main = 
    scotty 3000 $ 
    Scotty.get "/" $ do 
    -- html "Hello World!" 
    Wreq.get"https://www.metaweather.com/api/location/search/?query=New%20York" 

私はLiftIOを使用してみましたが、それはまだ私のタイプエラーを与えています。私は最初の "Hello World"をhtmlで表示したのと同じように、自分のレスポンスをどのように変換してフロントエンドに表示できるかを知りたかったのです。

Answer 1

あなただけのコンセプトの迅速な証拠を探していると誤った応答を心配していないしている場合、あなたはresponseBodyレンズを使用し、代わりにhtmlのrawに怠惰なバイト文字列を送信することができます：

main :: IO() 
main = 
    scotty 3000 $ 
    Scotty.get "/" $ do 
    r <- liftIO $ Wreq.get "https://www.metaweather.com/api/location/search/?query=New%20York" 
    raw (r ^. responseBody)