AoC, 2022, day 3
123456
my %prior = ('a'..'z', 'A'..'Z').flat Z=> 1..52;
with $*IN.lines».comb -> @A {
put 'part 1: ', %prior{ @A.map(-> @a { @a.head(+@a/2) (&) @a.tail(+@a/2) }) }.sum;
put 'part 2: ', %prior{ @A.map(-> @a1,@a2,@a3 { @a1 (&) @a2 (&) @a3 }) }.sum;
}
Raku
INFO