Here's something I put together after being sufficiently annoyed by the way Emacs would freeze for half a minute when I accidentally printed a 10KB string. It should be pretty much self-explanatory; hopefully someone will find a use for it.