diff options
| -rw-r--r-- | challenge-262/bob-lied/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-262/bob-lied/perl/ch-2.pl b/challenge-262/bob-lied/perl/ch-2.pl index f2ca12bbcc..6930f240b8 100644 --- a/challenge-262/bob-lied/perl/ch-2.pl +++ b/challenge-262/bob-lied/perl/ch-2.pl @@ -52,7 +52,7 @@ sub runTest use Test2::V0; is( countEqDiv(2, (3,1,2,2,2,1,3) ), 4, "Example 1"); - is( countEqDiv(2, (1,2,3) ), 0, "Example 2"); + is( countEqDiv(1, (1,2,3) ), 0, "Example 2"); done_testing; } |