Linen Layout

Today's Advent of Code was so fun, I couldn't stop re-implementing it! (spoiler alert: if you haven't done the 2024-12-19 puzzle yet, stop reading now!) Here it is in Perl #!/usr/bin/env perl use v5.40; use List::Util qw(sum); use Path::Tiny; my $filename = shift @ARGV // 'example'; my $contents = path($filename)->slurp; my @paragraphs = split /\n\n/, $contents; my @towels = split /, /,…