From ecbf1152fe9e6738e1dc32be70022e0b5715fba7 Mon Sep 17 00:00:00 2001
From: E7-87-83 <fungcheokyin@gmail.com>
Date: Mon, 22 Mar 2021 15:33:56 +0800
Subject: fix a serious bug!

---
 challenge-104/cheok-yin-fung/perl/ch-1.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-104/cheok-yin-fung/perl/ch-1.pl b/challenge-104/cheok-yin-fung/perl/ch-1.pl
index 111f6a72e4..b1b86da675 100644
--- a/challenge-104/cheok-yin-fung/perl/ch-1.pl
+++ b/challenge-104/cheok-yin-fung/perl/ch-1.pl
@@ -7,7 +7,7 @@ use warnings;
 
 my @a = (0,1);
 
-for my $i (3..50) {
+for my $i (2..50) {   #fixed on 08:33 BST
     $a[$i] = $i % 2 == 0 ? $a[$i/2] : $a[($i-1)/2]+$a[($i+1)/2];
 }
 
-- 
cgit