From 1984df5fca8e74b55ab4bd6df5e5cbe3f44ea78e Mon Sep 17 00:00:00 2001 From: Mohammad S Anwar Date: Sun, 19 Jul 2020 18:29:40 +0100 Subject: - Tidied up Raku solutions. --- challenge-069/mohammad-anwar/raku/ch-2.raku | 2 +- challenge-069/mohammad-anwar/raku/ch-2a.raku | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/challenge-069/mohammad-anwar/raku/ch-2.raku b/challenge-069/mohammad-anwar/raku/ch-2.raku index 8c0a86eddb..3f2e9114dc 100644 --- a/challenge-069/mohammad-anwar/raku/ch-2.raku +++ b/challenge-069/mohammad-anwar/raku/ch-2.raku @@ -18,7 +18,7 @@ sub string_0_1($string) { my $limit = .Int for $string ~~ m/(\d+)/; die "ERROR: Invalid string [$string]. S30 is the limit.\n" - if ($limit > 30); + if $limit > 30; my $string_0_1 = ''; for 1 .. $limit { diff --git a/challenge-069/mohammad-anwar/raku/ch-2a.raku b/challenge-069/mohammad-anwar/raku/ch-2a.raku index 5f8936d49f..5ca6600398 100644 --- a/challenge-069/mohammad-anwar/raku/ch-2a.raku +++ b/challenge-069/mohammad-anwar/raku/ch-2a.raku @@ -20,7 +20,7 @@ sub string_0_1($string) { my $limit = .Int for $string ~~ m/(\d+)/; die "ERROR: Invalid string [$string]. S30 is the limit.\n" - if ($limit > 30); + if $limit > 30; my $string_0_1 = ''; for 1 .. $limit { -- cgit