From fec3a326ddb1baf62d9f7fc21d4bba3b4e7d04c3 Mon Sep 17 00:00:00 2001 From: Walt Mankowski Date: Fri, 4 Sep 2020 19:35:18 -0400 Subject: removed check for blank spaces The prefix checks take care of this so don't need a special case for them. --- challenge-076/walt-mankowski/perl/ch-2.pl | 1 - 1 file changed, 1 deletion(-) diff --git a/challenge-076/walt-mankowski/perl/ch-2.pl b/challenge-076/walt-mankowski/perl/ch-2.pl index 50af98ce31..7a707deac9 100644 --- a/challenge-076/walt-mankowski/perl/ch-2.pl +++ b/challenge-076/walt-mankowski/perl/ch-2.pl @@ -42,7 +42,6 @@ my @dirs = ([ 0, 1], # e my @found; for my $row (0..$rows-1) { for my $col (0..$cols-1) { - next if $grid->[$row][$col] eq ' '; for my $dir (@dirs) { push @found, search_grid($grid, $row, $col, $dir, $words, $prefixes); } -- cgit