 (def ^:const default-jobs 1)
 
 (def ^:const pbar-width 35)
+
+(def stats-processed (atom 0))
 
 (def list-metrics-str "Path: %s, rollup: %s, period: %s, time: %s, data: %s")
 (def starting-str "==================== Starting ====================")

        (when show-stats?
          (let [mstore-stats (mstore/get-stats mstore)
                pstore-stats (pstore/get-stats pstore)]
            (show-stats (:processed mstore-stats)
                        (+ (:errors mstore-stats)
                           (:errors pstore-stats)))))))))


    (dry-mode-warn options)
    (process-paths tenant paths es-url options
                   (fn [pstore options tenant paths]
                     (swap! stats-processed inc)
                     (pstore/delete pstore tenant false false paths))
                   "Removing paths" true)
    (catch Exception e
