use 5.38.0; use Test2::V0; use Path::Tiny; use Part1; is Part1::parse_line("Game 1: 3 blue, 4 red; 1 red, 2 green, 6 blue; 2 green") => +{ game => 1, entries => [ { blue => 3, red => 4 }, { red => 1, green => 2, blue => 6}, { green => 2 }, ]}; my $input = path('input')->slurp; is Part1::solution_1($input) => 'TODO';