aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--challenge-159/cheok-yin-fung/java/Moebius.java2
-rw-r--r--challenge-159/cheok-yin-fung/perl/ch-1.pl2
-rw-r--r--challenge-159/cheok-yin-fung/perl/ch-2.pl6
3 files changed, 5 insertions, 5 deletions
diff --git a/challenge-159/cheok-yin-fung/java/Moebius.java b/challenge-159/cheok-yin-fung/java/Moebius.java
index b52e049ca8..fbd6b0af30 100644
--- a/challenge-159/cheok-yin-fung/java/Moebius.java
+++ b/challenge-159/cheok-yin-fung/java/Moebius.java
@@ -9,6 +9,8 @@ public class Moebius
int N = 1;
try {
N = Integer.parseInt(args[0]);
+ if (N<=0)
+ throw new ArithmeticException();
} catch (Exception e) {
System.err.print("Please use a positive integer ");
System.err.println("as your parameter.");
diff --git a/challenge-159/cheok-yin-fung/perl/ch-1.pl b/challenge-159/cheok-yin-fung/perl/ch-1.pl
index d6500f2c5f..111fb7b9a6 100644
--- a/challenge-159/cheok-yin-fung/perl/ch-1.pl
+++ b/challenge-159/cheok-yin-fung/perl/ch-1.pl
@@ -1,7 +1,7 @@
#!/usr/bin/perl
# The Weekly Challenge 159
# Task 1 Farey Sequence
-
+# Usage: ch-1.pl $N
# https://en.wikipedia.org/wiki/Farey_sequence#Next_term
use v5.22.0;
diff --git a/challenge-159/cheok-yin-fung/perl/ch-2.pl b/challenge-159/cheok-yin-fung/perl/ch-2.pl
index 0d58c1eeb4..30bc47f822 100644
--- a/challenge-159/cheok-yin-fung/perl/ch-2.pl
+++ b/challenge-159/cheok-yin-fung/perl/ch-2.pl
@@ -11,10 +11,8 @@ use POSIX;
use constant PI => 2*acos(0);
-if (defined($ARGV[0])) {
- my $N = $ARGV[0];
- say "mu($N) = ", mo($N);
-}
+my $N = $ARGV[0] if defined($ARGV[0]);
+say "mu($N) = ", mo($N) if defined($ARGV[0]);
sub irn {