Advent of Code. Day 4.

advent-4.ex

# Part 1
integer_stream = Stream.iterate(1, &(&1 + 1))
result = Enum.find(integer_stream, fn n ->
	case :crypto.hash(:md5, "bgvyzdsv" <> to_string(n)) |> Base.encode16 |> to_char_list do
		[48, 48, 48, 48, 48 | _ ] -> n
		_ -> false
	end
end)
IO.puts result

# Part 2
integer_stream = Stream.iterate(result, &(&1 + 1))
result = Enum.find(integer_stream, fn n ->
	case :crypto.hash(:md5, "bgvyzdsv" <> to_string(n)) |> Base.encode16 |> to_char_list do
		[48, 48, 48, 48, 48, 48 | _ ] -> n
		_ -> false
	end
end)
IO.puts result