From: Jan "Yenya" Kasprzak Date: Sun, 4 Dec 2022 05:13:07 +0000 (+0100) Subject: Day 4 part 2: after waking up X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?p=aoc.git;a=commitdiff_plain;h=abd533e70e32c8d217af12e6fea9536c8e2e287f Day 4 part 2: after waking up --- diff --git a/2022/08.pl b/2022/08.pl index c7f9131..8c70214 100755 --- a/2022/08.pl +++ b/2022/08.pl @@ -7,10 +7,7 @@ use experimental 'multidimensional'; my $count; while (<>) { my @r = /\d+/g; - $count++ if $r[0] <= $r[2] && $r[1] >= $r[3] - || $r[0] >= $r[2] && $r[1] <= $r[3] - || $r[0] <= $r[2] && $r[1] >= $r[2] - || $r[0] <= $r[3] && $r[1] >= $r[3]; + $count++ if $r[0] <= $r[3] && $r[1] >= $r[2]; } say $count;