snapframeworkを使用して、haskellの異なる 'string'タイプ間の変換を回避する方法はありますか？

Question

POSTデータのデコード結果を生成したい。多くのコードは 'string'を変換する際に '無駄になります'。それはコードを醜いものにします。より良い解決策はありますか？

import   Codec.Binary.Url (decode') 
import qualified Data.ByteString.Lazy.Char8 as L (unpack) 
import qualified Data.ByteString.Char8 as S (unpack, pack) 
import qualified Data.ByteString.Lazy as LBS (pack) 

decodeUrlHandler :: Snap() 
decodeUrlHandler = do 
    body <- readRequestBody (maxBound :: Int64) 
    writeLBS $ LBS.pack $ map (fromMaybe 0) $ decode' $ L.unpack body 

この目的のコードは何ですか？

Answer 1

スナップは自動的にリクエストをデコードし、Requestデータタイプを通じて利用可能にします。要求を取り出すための関数getRequestとwithRequestと、さまざまな部分を取得するためのその他のアクセサ関数を提供しています。

一般的な操作のための便利な機能もあります。 POSTまたはGETパラメータを取得するにはgetParamを参照してください。

Snapは、このAPIが非常に抽象度が低いため、ユーザーにテキストエンコーディングなどの処理方法を任せているため、ByteStringとして提供します。 Stringの代わりにはるかに効率的なText型を使用することをお勧めします。 Readableタイプのクラスは、これらの変換の定型文の一部を削除するためのメカニズムも提供します。数値とテキストのデフォルトインスタンスは、UTF8エンコーディングを想定しています。