 
   defp do_skip_header(device, false) do
     case IO.read device, :line do
-      "===\n" -> do_skip_header device, true
+      "---\n" -> do_skip_header device, true
       :eof -> device
       _ -> do_skip_header device, false
     end


  defp extract_header(device, lines, false) do
    case IO.read device, :line do
      "===\n" ->
        extract_header device, lines, true
      line when is_binary(line) ->
        extract_header device, lines, false


  defp extract_header(device, lines, true) do
    case IO.read device, :line do
      "---\n" ->
        {:ok, lines}
      line when is_binary(line) ->
        extract_header device, [line|lines], true
