From 3bd6aae5a9f865596464bbbe683536a1618b89b5 Mon Sep 17 00:00:00 2001
From: Mark A <andemark@a-iot1t.uch.ad.pvt>
Date: Mon, 14 Jun 2021 16:55:05 -0600
Subject: ch-1.raku again

---
 challenge-117/mark-anderson/raku/ch-1.raku | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/challenge-117/mark-anderson/raku/ch-1.raku b/challenge-117/mark-anderson/raku/ch-1.raku
index 9b779557a4..01f14ebc9b 100644
--- a/challenge-117/mark-anderson/raku/ch-1.raku
+++ b/challenge-117/mark-anderson/raku/ch-1.raku
@@ -2,7 +2,6 @@
 
 use Lingua::EN::Numbers;
 
-my @f = 'file.txt'.IO.comb(/\d+/);
-my @n = '1'..@f+1;
-my $n = (@n (-) @f).keys.head;
-say ($n, cardinal($n).tc).join(', Line ');
+my $n = (sum 1..15) - (sum 'file.txt'.IO.comb(/\d+/));
+
+say $n ~ ", Line " ~ cardinal($n).tc;
-- 
cgit