Czytanie YAML w Haskell

Question

Czekam, aby mój program Haskell odczytał ustawienia z zewnętrznego pliku, aby uniknąć rekompilacji w przypadku drobnych zmian. Znając YAML, pomyślałem, że to dobry wybór. Teraz muszę połączyć te dwie części. Jak dotąd Google nie był bardzo pomocny.

Mały przykładowy kod zajmujący się odczytywaniem i dekonstruowaniem YAML z pliku byłby bardzo doceniany.

Answer 1

Jeśli interesuje mnie, jakie pakiety są dostępne, przechodzę do hakowania, sprawdzam pełną listę pakietów, a następnie szukam tylko słowa kluczowego. Robi, że wychowuje tych wyborów (wraz z kilkoma innymi mniej istotnych z nich):

• yaml: http://hackage.haskell.org/package/yaml
• HsSyck: http://hackage.haskell.org/package/HsSyck

i owinięcie wokół HsSyck nazywa yaml-light: http://hackage.haskell.org/package/yaml-light

Zarówno yaml, jak i HsSyck wyglądają na stosunkowo niedawno zaktualizowane i wydają się być używane przez inne pakiety w powszechnym użyciu. Widać to poprzez sprawdzenie odwrotne deps:

• http://packdeps.haskellers.com/reverse/HsSyck
• http://packdeps.haskellers.com/reverse/yaml

Z tych dwóch, yaml ma więcej deps, ale to dlatego, że jest częścią ekosystemu jesod. Jedną z bibliotek, która zależy od HsSyck, jest ta, którą zdaję sobie sprawę, jest aktywnie utrzymywana, co oznacza, że ​​HsSyck też jest w porządku.

Następnym krokiem w dokonaniu wyboru byłoby przejrzenie dokumentacji obu bibliotek i sprawdzenie, który z nich był bardziej atrakcyjny dla moich celów.

Wygląda na to, że HsSyck ma więcej struktur, ale niewiele więcej, podczas gdy yaml przechodzi przez kodowanie json dostarczone przez aeson. To wskazuje mi, że ten pierwszy jest prawdopodobnie silniejszy, podczas gdy drugi jest wygodniejszy.

Answer 2

Prosty przykład:

Najpierw trzeba test.yml plik:

db: /db.sql 
limit: 100 

Reading YAML w Haskell

{-# LANGUAGE DeriveGeneriC#-} 

import GHC.Generics 
import Data.Yaml 

data Config = Config { db :: String 
        , limit :: Int 
        } deriving (Show, Generic) 

instance FromJSON Config 

main :: IO() 
main = do 
    file <- decodeFile "test.yml" :: IO (Maybe Config) 
    putStrLn (maybe "Error" show file)