aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xchallenge-198/jo-37/perl/ch-2.sh5
1 files changed, 5 insertions, 0 deletions
diff --git a/challenge-198/jo-37/perl/ch-2.sh b/challenge-198/jo-37/perl/ch-2.sh
new file mode 100755
index 0000000000..14174f9d2b
--- /dev/null
+++ b/challenge-198/jo-37/perl/ch-2.sh
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+# "prime_count" has inclusive ranges, so we need to adjust the limit.
+# This neat subtlety was carefully avoided in the examples.
+perl -MMath::Prime::Util=:all -E "say prime_count $1 - 1"