adventofcode/2023/06/part1.t

21 lines
357 B
Perl
Raw Normal View History

2023-12-06 15:31:39 +00:00
use 5.38.0;
use Test2::V0;
use Path::Tiny;
use Part1;
my $input = path('input')->slurp;
my $example = path('example')->slurp;
is [ map { Part1::race_solution(@$_)} Part1::parse_file($example)]
=> [4,8,9];
is Part1::solution_1($example) => 288;
cmp_ok Part1::solution_1($input), '<' ,230202;
is Part1::solution_1($input) => 'TODO';
done_testing;