day05
parent
55fb225898
commit
546b2d9fff
File diff suppressed because it is too large
Load Diff
|
@ -0,0 +1,13 @@
|
|||
|
||||
use 5.20.0;
|
||||
|
||||
my @maze = <>;
|
||||
my $position = 0;
|
||||
my $steps = 0;
|
||||
|
||||
while( $position < @maze ) {
|
||||
$steps++;
|
||||
$position += $maze[$position]++;
|
||||
}
|
||||
|
||||
say $steps;
|
|
@ -0,0 +1,14 @@
|
|||
use 5.20.0;
|
||||
|
||||
my @maze = <>;
|
||||
my $position = 0;
|
||||
my $steps = 0;
|
||||
|
||||
while( $position < @maze ) {
|
||||
$steps++;
|
||||
my $i = $position;
|
||||
$position += $maze[$position];
|
||||
$maze[$i] += $maze[$i] > 2 ? -1 : 1;
|
||||
}
|
||||
|
||||
say $steps;
|
Loading…
Reference in New Issue