recurrsive read all the string
Merge branch 'master' of https://github.com/wuhao007/haskell