I've once seen this kind of assertion:

(is (= (-> response :body (json/read-str :key-fn keyword))
               [{:paper-quantity-standard 512
                 :nickname                "Galactic printer"
                 :brand                   "EPSON"
                 :prints-color?           true
                 :papers-quantity-photo   35
                 :prints-photo?           true
                 :public-id               logic.common/valid-uuid-str?
                 :model                   "GalaxyPrint 3000"}]))