Demo code for a talk about Iteratees in Haskell held at the Regensburg Haskell Meetup