#19 make function digestMd5 :: Pipe ByteString ByteString m ()