diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2021-12-10 12:44:07 +0000 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2021-12-10 12:44:07 +0000 |
| commit | b5ad6304f009f456549d5cea667a1e8e6199236f (patch) | |
| tree | 6d9cdb9a7f9cff18a0d2524d325ab103bc8c5240 /challenge-075 | |
| parent | 69ce9c30f8de5b734e51bdd00bb87eedece179fd (diff) | |
| download | perlweeklychallenge-club-b5ad6304f009f456549d5cea667a1e8e6199236f.tar.gz perlweeklychallenge-club-b5ad6304f009f456549d5cea667a1e8e6199236f.tar.bz2 perlweeklychallenge-club-b5ad6304f009f456549d5cea667a1e8e6199236f.zip | |
- Tidied up Perl unit test for task 1 of week 75.
Diffstat (limited to 'challenge-075')
| -rwxr-xr-x | challenge-075/mohammad-anwar/perl/ch-1.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-075/mohammad-anwar/perl/ch-1.t b/challenge-075/mohammad-anwar/perl/ch-1.t index c2d32443b5..18ad74f6b0 100755 --- a/challenge-075/mohammad-anwar/perl/ch-1.t +++ b/challenge-075/mohammad-anwar/perl/ch-1.t @@ -33,7 +33,7 @@ sub coins_sum { my $matrix; # Sum of 0 can be achieved in one possible way. - $matrix->[$_][0] = 1 for (0 .. $size+1); + $matrix->[$_][0] = 1 for (0 .. $size); foreach my $i (0 .. $size) { |