From bf5891888bbc7d1f4a2221154c1cce6c983e5c19 Mon Sep 17 00:00:00 2001
From: Zapwai <zapwai@gmail.com>
Date: Tue, 2 Jan 2024 22:35:11 -0500
Subject: forgot to modulo

---
 challenge-250/zapwai/perl/ch-1.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-250/zapwai/perl/ch-1.pl b/challenge-250/zapwai/perl/ch-1.pl
index 8a77df08de..a9c8705de4 100644
--- a/challenge-250/zapwai/perl/ch-1.pl
+++ b/challenge-250/zapwai/perl/ch-1.pl
@@ -4,7 +4,7 @@ my @ints = (0, 1, 2);
 #my @ints = (1, 2, 3, 4, 5, 6, 7, 8, 9, 0);
 my $index = -1;
 for my $i (0 .. $#ints) {
-    if ($i == $ints[$i]) {
+    if ($i % 10 == $ints[$i]) {
 	$index = $i ;
 	last;
     }
-- 
cgit