main :: IO ()
main = booting (pluginSimple "application") go
  where
    go = forever $ do
      user <- require "user"
      logInfo $ "Hello, " <> user <> "!"
      liftIO $ threadDelay 1000000