I'm enjoying RWH (available freely at http://book.realworldhaskell.org/read/). I'm only about a third of the way through it, but every few chapters the author ostensibly takes a break from the pedagogy to show us how to build a real program (in reality, there is a lot of teaching in those chapters, so don't skip them).