import qualified Data.ByteString as B ( putStr, readFile )