use lib qw/ . /; use lib qw! ../../perl-lib !; use 5.36.0; package Part2; use Moo; use AoC::Grid; use List::AllUtils qw/ sum /; extends 'Part1'; sub trailhead_score_resolution($self,%endpoints) { return sum values %endpoints; } 1;