aoc2015

commit 0324c287a598a24a5d1b59a2e267ee7767845762
parent cd3b89969cf1a7367eb322d911f407a6a979be36
Author: Samir Parikh <noreply@samirparikh.com>
Date:   Tue,  8 Nov 2022 01:40:42 +0000

ok, that's enough!

Diffstat:
M
day14/day14.pl
 | 
11
++++-------

1 file changed, 4 insertions(+), 7 deletions(-)
diff --git a/day14/day14.pl b/day14/day14.pl
@@ -17,13 +17,10 @@ my %reindeer = %{ init_reindeer( $input ) };
 foreach my $time ( 1 .. $TIME ) {
     # after each second...
     # ...find position of each reindeer...
-    foreach ( keys %reindeer ) {
-        $reindeer{ $_ }{ position } =
-            get_position( $reindeer{ $_ }{ speed },
-                          $reindeer{ $_ }{ fly_duration },
-                          $reindeer{ $_ }{ rest_duration },
-                          $time );
-    }
+    $reindeer{ $_ }{ position } = get_position( $reindeer{ $_ }{ speed },
+                                                $reindeer{ $_ }{ fly_duration },
+                                                $reindeer{ $_ }{ rest_duration },
+                                                $time ) foreach ( keys %reindeer );
     # ...and the furthest distance traveled after that second... 
     my $furthest_position = max map { $reindeer{ $_ }{ position }} keys %reindeer;
     # ...by which reindeer(s)...