From 30328ce0f5b6e811b4d6358ceb5ea54ea1f7758a Mon Sep 17 00:00:00 2001 From: Lubos Kolouch Date: Sun, 13 Sep 2020 12:11:25 +0200 Subject: Remove extra space --- challenge-077/lubos-kolouch/perl/ch-2.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-077/lubos-kolouch/perl/ch-2.pl b/challenge-077/lubos-kolouch/perl/ch-2.pl index 711ac85dc7..0771415216 100644 --- a/challenge-077/lubos-kolouch/perl/ch-2.pl +++ b/challenge-077/lubos-kolouch/perl/ch-2.pl @@ -18,7 +18,7 @@ sub is_position_lone { next if $d_x == 0 and $d_y == 0; next if ( $pos_x + $d_x < 0 ) or ( $pos_x + $d_x >= scalar @$matrix ); - next if ( $pos_y + $d_y < 0 ) or ( $pos_y + $d_y >= scalar @$matrix ); + next if ( $pos_y + $d_y < 0 ) or ( $pos_y + $d_y >= scalar @$matrix ); return 0 if $matrix->[ $pos_x + $d_x ][ $pos_y + $d_y ] eq 'X'; } -- cgit