[Haskell-cafe] Trivial database access in Haskell