(define (hoeveel-worden-met-e? l)
  (define result 0)
  (plist:for-each l (lambda (woord) (if (kmp:match woord "e") (set! result (+ result 1)))))
  result)