diff options
| author | E7-87-83 <fungcheokyin@gmail.com> | 2021-03-22 15:33:56 +0800 |
|---|---|---|
| committer | E7-87-83 <fungcheokyin@gmail.com> | 2021-03-22 15:33:56 +0800 |
| commit | ecbf1152fe9e6738e1dc32be70022e0b5715fba7 (patch) | |
| tree | fe4fe0aea6556e457d30669fbb4ef775345a71bd | |
| parent | 651d1d0e52cbd32f09c03e1e8a2342432ade0833 (diff) | |
| download | perlweeklychallenge-club-ecbf1152fe9e6738e1dc32be70022e0b5715fba7.tar.gz perlweeklychallenge-club-ecbf1152fe9e6738e1dc32be70022e0b5715fba7.tar.bz2 perlweeklychallenge-club-ecbf1152fe9e6738e1dc32be70022e0b5715fba7.zip | |
fix a serious bug!
| -rw-r--r-- | challenge-104/cheok-yin-fung/perl/ch-1.pl | 2 |
1 files changed, 1 insertions, 1 deletions
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]; } |