1 files changed, 33 insertions, 0 deletions
diff --git a/challenge-154/abigail/java/ch-1.java b/challenge-154/abigail/java/ch-1.java
new file mode 100644
index 0000000000..a93a8d372e
--- /dev/null
+++ b/challenge-154/abigail/java/ch-1.java
@@ -0,0 +1,33 @@
+//
+// See https://theweeklychallenge.org/blog/perl-weekly-challenge-154
+//
+
+//
+// Run as: ln ch-1.java ch1.java; javac ch1.java; java ch1 < input-file
+//
+
+import java.util.*;
+
+public class ch1 {
+    public static void main (String [] args) {
+        String [] p = {"PERL", "PELR", "PREL", "PRLE", "PLER", "PLRE",
+                       "EPRL", "EPLR", "ERPL", "ERLP", "ELPR", "ELRP",
+                       "REPL", "RELP", "RPEL", "RPLE", "RLEP", "RLPE",
+                       "LERP", "LEPR", "LREP", "LRPE", "LPER", "LPRE"};
+
+        Scanner scanner = new Scanner (System . in);
+        while (scanner . hasNextLine ()) {
+            String line = scanner . nextLine () . trim ();
+            for (int i = 0; i < 24; i ++) {
+                if (p [i] . equals (line)) {
+                    p [i] = "";
+                }
+            }
+        }
+        for (int i = 0; i < 24; i ++) {
+            if (p [i] != "") {
+                System . out . println (p [i]);
+            }
+        }
+    }
+}