https://devhubby.com/thread/how-to-read-n-lines-in-a-file-with-haskell