.xmobarrc

-- ~/.xmobarrc
Config { commands = [ Run Cpu [ "-t", "CPU: <total>%"
                              , "-L", "3"
                              , "-H", "50"
                              , "-l", "green"
                              , "-n", "orange"
                              , "-h", "red"] 10
                    , Run Memory ["-t", "RAM: <usedratio>%"] 10
                    , Run Uptime [] 10
                    , Run Network "eth0" [ "-t", "Network: <rx>kB <tx>kB"
                                         , "-L", "0"
                                         , "-H", "32"
                                         , "-n", "green"
                                         , "-h", "red"
                                         ] 10
                    , Run  DiskU [("/", "root <used>/<size>"), ("/home", "home <used>/<size>")]
                                 [ "-L", "20"
                                 , "-H", "50"
                                 , "-l", "green"
                                 , "-n", "orange"
                                 , "-h", "red"
                                 ] 10
                    , Run Weather "EHEH" [ "-t", "Temp: <tempC>C"
                                         , "-L", "5"
                                         , "-H", "30"
                                         , "-l", "lightblue"
                                         , "-n", "green"
                                         , "-h", "red"
                                         ] 120
                    ]
       , position = TopW L 100
       , template = "%cpu% | %memory% | %eth0% | %disku% }{ %uname% | %uptime% | %EHEH% | %date%"
       }

xmonad.hs

-- ~/.xmonad/xmonad.hs
import           XMonad
import           XMonad.Hooks.ManageDocks
import           XMonad.Hooks.DynamicLog
import           XMonad.Util.Run
 
main = do
    xmproc <- spawnPipe "xmobar"
    xmonad $ defaultConfig
                 { terminal    = "urxvt"
 
                 , normalBorderColor = "#888888"
                 , focusedBorderColor = "#999999"
                 , borderWidth = 3
 
                 , manageHook = manageDocks <+> manageHook defaultConfig
                 , layoutHook = avoidStruts  $  layoutHook defaultConfig
                 , logHook = dynamicLogWithPP xmobarPP
                                 { ppOutput = hPutStrLn xmproc
                                 , ppTitle = xmobarColor "green" "" . shorten 50
                                 }
                 }