anchor.diff:    "Detects if the given string is an HTTP querystring."
     (cl-ppcre:scan *scanner-querystring-p* querystring))
   
  +(defun get-querystring-hash-r (container subkeys val)
  +  "Recursively build a tree of hashes based on a given set of subkeys in a query
  +   string."
  +  (unless subkeys
  +    (return-from get-querystring-hash-r val))
  +  (let* ((key (car subkeys)))
  +    (let ((container (if container
  +                         container
  +                         (make-hash-table :test #'equal))))
  +      (let ((newcontainer (gethash key container)))
  +        (setf (gethash key container) (get-querystring-hash-r newcontainer (cdr subkeys) val)))
  +      container)))
  +
   (defun set-querystring-hash (hash key val)
     "Set the key of a querystring var into a hash, creating as many nested hashes
      as needed. For instance:
  
positive.code:    Would update `myhash` with
       [body] => < hash: [tags] => \"dogs,animals,bark\" >"
    (let* ((subkeys (cl-ppcre:split "(\\]\\[|\\[|\\])" key))
           (subkeys (remove-if #'null subkeys))
           (curhash hash))
      (dotimes (i (length subkeys))
        (let ((subkey (car subkeys))
              (is-last (null (cdr subkeys))))
          (if is-last
              (progn
                (setf (gethash subkey curhash) val)
                (return))
              (progn
                (unless (hash-table-p (gethash subkey curhash))
                  (setf (gethash subkey curhash) (make-hash-table :test #'equal)))
                (setf curhash (gethash subkey curhash)
                      subkeys (cdr subkeys))))))))
  
  (defun querystring-to-hash (querystring)
    "Convert a querystring into a hash table."
  
negative.code:                (key (car split))
                 (val (cadr split))
                 (val (do-urlencode:urldecode val :lenientp t :queryp t)))
            (setf main-hash (set-querystring-hash main-hash key val))))
        (convert-hash-vectors main-hash))))
  
  (defun print-hash (hash-table &optional (indent 0))
    "Useful for debugging hash tables."
  