diff options
| -rwxr-xr-x | challenge-208/jaldhar-h-vyas/perl/ch-2.pl | 2 | ||||
| -rwxr-xr-x | challenge-208/jaldhar-h-vyas/raku/ch-2.raku | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/challenge-208/jaldhar-h-vyas/perl/ch-2.pl b/challenge-208/jaldhar-h-vyas/perl/ch-2.pl index ba3c32a940..198716ae7f 100755 --- a/challenge-208/jaldhar-h-vyas/perl/ch-2.pl +++ b/challenge-208/jaldhar-h-vyas/perl/ch-2.pl @@ -17,7 +17,7 @@ for my $i (0 .. scalar @nums - 1) { my $duplicate //= (grep { $count{$_} > 1; } keys %count)[0]; if ($duplicate) { - if ($duplicate == $nums[-1]) { + if (!defined $missing && $duplicate == $nums[-1]) { $missing = $nums[-1] + 1; } diff --git a/challenge-208/jaldhar-h-vyas/raku/ch-2.raku b/challenge-208/jaldhar-h-vyas/raku/ch-2.raku index 464a374c3c..aa0195c0d5 100755 --- a/challenge-208/jaldhar-h-vyas/raku/ch-2.raku +++ b/challenge-208/jaldhar-h-vyas/raku/ch-2.raku @@ -17,7 +17,7 @@ sub MAIN( my $duplicate = %count.keys.grep({ %count{$_} > 1; }).first; if $duplicate { - if $duplicate == @nums[*-1] { + if !defined $missing && $duplicate == @nums[*-1] { $missing = @nums[*-1] + 1; } |