diff options
| author | Lubos Kolouch <lubos@kolouch.net> | 2020-09-13 12:11:25 +0200 |
|---|---|---|
| committer | Lubos Kolouch <lubos@kolouch.net> | 2020-09-13 12:11:25 +0200 |
| commit | 30328ce0f5b6e811b4d6358ceb5ea54ea1f7758a (patch) | |
| tree | db5f1272760da541292c04843cb7eb7caa1552e9 | |
| parent | 708410c89342ae715feefdb60614da28f69a4e57 (diff) | |
| download | perlweeklychallenge-club-30328ce0f5b6e811b4d6358ceb5ea54ea1f7758a.tar.gz perlweeklychallenge-club-30328ce0f5b6e811b4d6358ceb5ea54ea1f7758a.tar.bz2 perlweeklychallenge-club-30328ce0f5b6e811b4d6358ceb5ea54ea1f7758a.zip | |
Remove extra space
| -rw-r--r-- | challenge-077/lubos-kolouch/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
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'; } |