diff options
| -rw-r--r-- | challenge-161/0rir/raku/ch-1.raku | 2 | ||||
| -rw-r--r-- | challenge-161/0rir/raku/ch-2.raku | 2 |
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 ]; |