From 7b52e47cbd16bc213b2969ddcc8f1aa399d4ee20 Mon Sep 17 00:00:00 2001
From: Aaron Sherman <ajs@ajs.com>
Date: Mon, 24 Jun 2019 10:03:36 -0400
Subject: Fixed a bug in word separation

---
 challenge-014/aaron-sherman/us-words.p6 | 20 +++++++++++---------
 1 file changed, 11 insertions(+), 9 deletions(-)

diff --git a/challenge-014/aaron-sherman/us-words.p6 b/challenge-014/aaron-sherman/us-words.p6
index 1506d335fd..fdc5be91f9 100755
--- a/challenge-014/aaron-sherman/us-words.p6
+++ b/challenge-014/aaron-sherman/us-words.p6
@@ -30,15 +30,17 @@ sub get-states-map() {
         MO MT NE NV NH NJ NM NY NC ND OH OK OR PA RI SC SD TN TX UT VT VA WA WV
         WI WY>;
     my @others = <DC AS GU MP PR VI FM MH PW AA AE AP CM CZ NB PI TT>;
-    my @names = |<Alabama Alaska Arizona Arkansas California Colorado
-        Connecticut Delaware Florida Georgia Hawaii
-        Idaho Illinois Indiana Iowa Kansas Kentucky Louisiana Maine Maryland
-        Massachusetts Michigan Minnesota Mississippi Missouri Montana
-        Nebraska Nevada New Hampshire New Jersey New Mexico New York North
-        Carolina North Dakota Ohio Oklahoma Oregon Pennsylvania>,
-        |['Rhode Island'],
-        |<South Carolina South Dakota Tennessee Texas Utah Vermont Virginia
-        Washington West Virginia Wisconsin Wyoming>;
+    my @names =
+        "Alabama", "Alaska", "Arizona", "Arkansas", "California", "Colorado",
+        "Connecticut", "Delaware", "Florida", "Georgia", "Hawaii", "Idaho",
+        "Illinois", "Indiana", "Iowa", "Kansas", "Kentucky", "Louisiana", "Maine",
+        "Maryland", "Massachusetts", "Michigan", "Minnesota", "Mississippi",
+        "Missouri", "Montana", "Nebraska", "Nevada", "New Hampshire",
+        "New Jersey", "New Mexico", "New York", "North Carolina", "North Dakota",
+        "Ohio", "Oklahoma", "Oregon", "Pennsylvania", "Rhode Island",
+        "South Carolina", "South Dakota", "Tennessee", "Texas", "Utah",
+        "Vermont", "Virginia", "Washington", "West Virginia", "Wisconsin",
+        "Wyoming";
     my @others-names =
         "District of Columbia", "American Samoa", "Guam",
         "Northern Mariana Islands", "Puerto Rico", "U.S. Virgin Islands",
-- 
cgit