From 80ef4801d385e9d0463bbd5debbf5e51c35115d1 Mon Sep 17 00:00:00 2001 From: Matthew Neleigh Date: Sun, 26 Dec 2021 18:37:41 -0500 Subject: modified: challenge-144/mattneleigh/perl/ch-1.pl --- challenge-144/mattneleigh/perl/ch-1.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/challenge-144/mattneleigh/perl/ch-1.pl b/challenge-144/mattneleigh/perl/ch-1.pl index 4637503816..1a2b89a3d1 100755 --- a/challenge-144/mattneleigh/perl/ch-1.pl +++ b/challenge-144/mattneleigh/perl/ch-1.pl @@ -92,7 +92,8 @@ sub find_semiprimes{ } # End for $j } # End for $i - # Sort the primes in ascending order + # Sort the semiprimes in ascending + # order @semiprimes = sort({ $a->{product} <=> $b->{product} } @semiprimes); return(@semiprimes); -- cgit