स्नैपफ्रेमवर्क का उपयोग करके हैकेल में विभिन्न 'स्ट्रिंग' प्रकारों में कनवर्ट करने से कैसे बचें?

Question

मैं पोस्ट डेटा के लिए डीकोडेड परिणाम देना चाहता हूं। 'स्ट्रिंग' को परिवर्तित करने में बहुत अधिक कोड 'बर्बाद' होता है। यह कोड बदसूरत बनाता है। कोई बेहतर समाधान?

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 देखें।

स्नैप इसे बाइटस्ट्रिंग के रूप में देता है क्योंकि यह एपीआई काफी कम स्तर पर अमूर्तता पर बैठता है, जिससे उपयोगकर्ता को पाठ एन्कोडिंग जैसी चीज़ों को कैसे संभाला जा सकता है। मैं अनुशंसा करता हूं कि आप स्ट्रिंग के बजाय अधिक कुशल टेक्स्ट प्रकार का उपयोग करें। Readable टाइप क्लास इन रूपांतरणों के बॉयलरप्लेट को समाप्त करने के लिए एक तंत्र भी प्रदान करता है। संख्याओं और पाठ के लिए डिफ़ॉल्ट उदाहरण UTF8 एन्कोडिंग मानते हैं।