(module test mzscheme
  (require (planet "unzip.ss" ("dherman" "zip.plt" 2)))

  (define zip-file (build-path "
  (define dir (read-zip-directory