aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorrir <rirans@comcast.net>2022-06-13 13:38:43 -0400
committerrir <rirans@comcast.net>2022-06-17 14:15:12 -0400
commit373d3af43568d2e60124372a10d9d7550cb41d08 (patch)
treeff6247b80bab1b5b00e5555ef8c321d918750a0b
parent04fbf6ea04187032f7e2e61f8823d3e04699b326 (diff)
downloadperlweeklychallenge-club-373d3af43568d2e60124372a10d9d7550cb41d08.tar.gz
perlweeklychallenge-club-373d3af43568d2e60124372a10d9d7550cb41d08.tar.bz2
perlweeklychallenge-club-373d3af43568d2e60124372a10d9d7550cb41d08.zip
Update location to central dictionary
-rw-r--r--challenge-161/0rir/raku/ch-1.raku2
-rw-r--r--challenge-161/0rir/raku/ch-2.raku2
2 files changed, 2 insertions, 2 deletions
diff --git a/challenge-161/0rir/raku/ch-1.raku b/challenge-161/0rir/raku/ch-1.raku
index 03f3cd82e7..32f279624d 100644
--- a/challenge-161/0rir/raku/ch-1.raku
+++ b/challenge-161/0rir/raku/ch-1.raku
@@ -8,7 +8,7 @@ use v6.d;
# Do not accept a lossy loop. All is best DRY.
-$?FILE.IO.parent(1).add("dictionary.txt").lines(:chomp).grep {
+$?FILE.IO.parent(4).add("data/dictionary.txt").lines(:chomp).grep( {
.comb.sort.join eq $_ }
).sort(
{ $^b.chars <=> $^a.chars }
diff --git a/challenge-161/0rir/raku/ch-2.raku b/challenge-161/0rir/raku/ch-2.raku
index 08eb6f564a..6579319ccd 100644
--- a/challenge-161/0rir/raku/ch-2.raku
+++ b/challenge-161/0rir/raku/ch-2.raku
@@ -15,7 +15,7 @@ my $best-size;
# to fail quickly if there are no pangrams available.
my constant @data =
- $?FILE.IO.parent(1).add("dictionary.txt").lines(:chomp).sort:
+ $?FILE.IO.parent(4).add("data/dictionary.txt").lines(:chomp).sort:
{ $^b.chars <=> $^a.chars };
my constant %alpha = map { $_ => True }, ('a'..'z')[0 .. $A-Z-SIZE -1 ];