use lib qw~ . ~; use Part1; use Part2; use Test2::V0; use Path::Tiny; use File::Serialize; my $solutions = deserialize_file './solutions.yml'; subtest 'part 1' => sub { is( Part1->new(input=>[125,17])->solve() => 55312 ); is( Part1->new(file=>'input')->solve() => $solutions->{part1} ); }; subtest 'part 2' => sub { is( Part2->new(file=>'input')->solve() => $solutions->{part2}); }; done_testing();