diff options
| -rwxr-xr-x | challenge-245/wlmb/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-245/wlmb/perl/ch-2.pl b/challenge-245/wlmb/perl/ch-2.pl index 2fed8c0f94..8ee193d592 100755 --- a/challenge-245/wlmb/perl/ch-2.pl +++ b/challenge-245/wlmb/perl/ch-2.pl @@ -28,7 +28,7 @@ my @candidates; # if neccesary to remove numbers if($total==1){ # remove the smallest number that leaves a residue one push @candidates, [$one[0]] if(@one); - # remove the two smallest numbers that leaves a residue one + # remove the two smallest numbers that leaves a residue two push @candidates, [@two[1,0]] if(@two>=2); } if($total==2){ |