diff options
| -rwxr-xr-x | challenge-061/PerlBoy1967/perl/ch-1.pl | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/challenge-061/PerlBoy1967/perl/ch-1.pl b/challenge-061/PerlBoy1967/perl/ch-1.pl index 3717d09c11..18b39ac05d 100755 --- a/challenge-061/PerlBoy1967/perl/ch-1.pl +++ b/challenge-061/PerlBoy1967/perl/ch-1.pl @@ -73,9 +73,6 @@ foreach my $list (@listOfLists) { $rIdx++; } - # List exhausted? - last if ($rIdx == scalar(@list) - 1); - $lIdx = $rIdx - 1; # Calculate the new potential maximum |