data = IO.read(:stdio, :eof)
|> String.trim()

mul = fn [a, b] -> String.to_integer(a) * String.to_integer(b) end

ans1 = Regex.scan(~r/mul\((\d+),(\d+)\)/, data)
|> Enum.map(&tl/1)
|> Enum.map(mul)
|> Enum.sum()

IO.puts(ans1)

ans2 = Regex.scan(~r/do\(\)|don\'t\(\)|mul\((\d+),(\d+)\)/, data)
|> Enum.reduce({true, 0}, fn
  ["do()"], {_, acc} -> {true, acc}
  ["don't()"], {_, acc} -> {false, acc}
  _, {false, acc} -> {false, acc}
  mulop, {true, acc} -> {true, acc + mul.(tl(mulop))}
end)
|> elem(1)

IO.puts(ans2)