MissingH-1.1.0.3: examples/simplegrep.hs

import MissingH.List
main = do
   c <- getContents
   putStr (unlines(filter (\line -> contains "Haskell" line)
                          (lines c)))