Here are my #AdventOfCode helper functions for #Mathematica. When you evaluate "AdventProblem[n]", it automatically browses to problem n and returns the input data for the problem. "AdventSubmit[answer]" automatically submits the solution.

$Mathematica code session = StartWebSession[]; WebExecute[session, "OpenPage" -> "https://adventofcode.com/auth/github"]; AdventProblem[n_] := WebExecute[session, {"OpenPage" -> "https://adventofcode.com/2022/day/" <> ToString@n <> "/input", "ElementText" -> "XPath" -> "*", "OpenPage" -> "https://adventofcode.com/2022/day/" <> ToString@n }][[2, 1]] AdventSubmit[answer_] := With[{answerBox = WebExecute[session, "LocateElements" -> "Tag" -> "input"][[2]]}, WebExecute[ session, {"TypeElement" -> {answerBox, ToString@answer}, "SubmitElement" -> answerBox}]]$