From abd533e70e32c8d217af12e6fea9536c8e2e287f Mon Sep 17 00:00:00 2001 From: "Jan \"Yenya\" Kasprzak" Date: Sun, 4 Dec 2022 06:13:07 +0100 Subject: [PATCH] Day 4 part 2: after waking up --- 2022/08.pl | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) 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; -- 2.43.0