From 5182b192585848d1b91afce11d151906762d9bcd Mon Sep 17 00:00:00 2001 From: Stephen Lynn Date: Sat, 11 Jun 2022 21:07:19 +0800 Subject: improved ch-2.pl --- challenge-168/steve-g-lynn/perl/ch-2.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/challenge-168/steve-g-lynn/perl/ch-2.pl b/challenge-168/steve-g-lynn/perl/ch-2.pl index 4732c9b136..4fcc0e19dd 100755 --- a/challenge-168/steve-g-lynn/perl/ch-2.pl +++ b/challenge-168/steve-g-lynn/perl/ch-2.pl @@ -9,6 +9,7 @@ print &home_prime(16),"\n"; print &home_prime(20),"\n"; #3318308475676071413 + sub home_prime { my ($n)=@_; is_prime($n) && return $n; -- cgit