From cf8b890586305cb9ceccf9c0ba3419a898279b68 Mon Sep 17 00:00:00 2001
From: Bob Lied <boblied+github@gmail.com>
Date: Sat, 30 Mar 2024 09:21:33 -0500
Subject: Week 262 solution with blog

---
 challenge-262/bob-lied/perl/ch-2.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
 }
-- 
cgit