module AddExample where
import BaseXClient
main :: IO ()
main = withSession "localhost" 1984 "admin" "admin" $ \session -> do
execute "create db database" session >>= print
add "world/World.xml" "Hello World!" session >>= print
add "Universe.xml" "Hello Universe!" session >>= print
execute "xquery /" session >>= print
execute "drop db database" session >>= print