From 94fb7bfc97525637029b22a4727db362edde6374 Mon Sep 17 00:00:00 2001
From: "Markus \"Holli\" Holzer" <holli.holzer@gmail.com>
Date: Thu, 8 Oct 2020 15:40:30 +0200
Subject: avoid $_

---
 challenge-081/markus-holzer/raku/ch-1.raku | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-081/markus-holzer/raku/ch-1.raku b/challenge-081/markus-holzer/raku/ch-1.raku
index d29156c0bb..e9a18dd53e 100644
--- a/challenge-081/markus-holzer/raku/ch-1.raku
+++ b/challenge-081/markus-holzer/raku/ch-1.raku
@@ -6,6 +6,6 @@ my Str $B = @*ARGS.max(*.chars);
 # Custom operator, just for fun
 multi sub infix:<%%>( Str $n, Str $d ) returns Bool {
     given $n.chars / $d.chars {
-        .denominator == 1 && $n eq $d x $_ }}
+        .denominator == 1 && $n eq $d x .numerator }}
 
 .say for grep all($A, $B) %% *, [\~] $A.comb;
-- 
cgit