[Haskell-cafe] Extract source code from literate Haskell (LHS) files

This is of course very easy to do manually, but does a command line tool exist for extracting source code from literate Haskell files? Thanks, Peter