我正在尝试处理一个包含俄语符号的文件。当读取并写入一些文本到文件后,我得到了以下类似的内容:
\160\192\231\229\240\225\224\233\228\230\224\237
如何获取正常的符号?
我正在尝试处理一个包含俄语符号的文件。当读取并写入一些文本到文件后,我得到了以下类似的内容:
\160\192\231\229\240\225\224\233\228\230\224\237
如何获取正常的符号?
如果你获取的字符串中包含反斜杠和数字,那么很可能你想要调用“putStr”,而不是“print”。
import System.IO hiding (hPutStr, hPutStrLn, hGetLine, hGetContents, putStrLn)
import System.IO.UTF8
import Codec.Binary.UTF8.String (utf8Encode)
main = System.IO.UTF8.putStrLn "Вася Пупкин"
我取得了成功。
{-# LANGUAGE ImplicitParams #-}
import Network.HTTP
import Text.HTML.TagSoup
import Data.Encoding
import Data.Encoding.CP1251
import Data.Encoding.UTF8
openURL x = do
x <- simpleHTTP (getRequest x)
fmap (decodeString CP1251) (getResponseBody x)
main :: IO ()
main = do
tags <- fmap parseTags $ openURL "http://www.trade.su/search?ext=1"
let TagText r = partitions (~== "<input type=checkbox>") tags !! 1 !! 4
appendFile "out" r