main = do
  conn <- connect "127.0.0.1" 9000
  print =<< ping conn "haskell client calling."
main = do
  conn <- connect "127.0.0.1" 9000
  print =<< ping conn "haskell client calling."
main = do
  conn <- connect "127.0.0.1" 9000
  print =<< ping conn "haskell client calling."