diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2022-04-12 11:50:20 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-04-12 11:50:20 +0100 |
| commit | 5ed0e322f97c9882291decf59fafb0338203fce5 (patch) | |
| tree | d968139d1de2d42db6314260f38131c06a09066d | |
| parent | 79bd6d44f670b75c7d9579d8af505047cab95f04 (diff) | |
| parent | 3f39aaa5ac24f90184ed88da6b08807db9a9411c (diff) | |
| download | perlweeklychallenge-club-5ed0e322f97c9882291decf59fafb0338203fce5.tar.gz perlweeklychallenge-club-5ed0e322f97c9882291decf59fafb0338203fce5.tar.bz2 perlweeklychallenge-club-5ed0e322f97c9882291decf59fafb0338203fce5.zip | |
Merge pull request #5924 from mattneleigh/pwc160
modified: challenge-160/mattneleigh/perl/ch-1.pl
| -rwxr-xr-x | challenge-160/mattneleigh/perl/ch-1.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-160/mattneleigh/perl/ch-1.pl b/challenge-160/mattneleigh/perl/ch-1.pl index d06b04a58b..6e7afa1ec2 100755 --- a/challenge-160/mattneleigh/perl/ch-1.pl +++ b/challenge-160/mattneleigh/perl/ch-1.pl @@ -42,7 +42,7 @@ foreach $number (@numbers){ $table[$number][0] . " is " . $table[$table[$number][1]][0] . - ", "; + ($table[$number][1] == 10 ? "." : ", "); $number = $table[$number][1]; } |