From a1ee4822771957e34d6990e35c272c8da183027d Mon Sep 17 00:00:00 2001 From: Andinus Date: Sat, 11 Sep 2021 18:47:44 +0530 Subject: Raku: Complete Phone Number & RNA Transcription --- raku/phone-number/Phone.rakumod | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'raku') diff --git a/raku/phone-number/Phone.rakumod b/raku/phone-number/Phone.rakumod index 66a9e24..0761246 100644 --- a/raku/phone-number/Phone.rakumod +++ b/raku/phone-number/Phone.rakumod @@ -18,7 +18,7 @@ sub clean-number(Str $number --> Str) is export { # matches "("; die @errors[4] if $number.contains: /<[!:]>/; - my Int @num = $number.comb.grep(/\d/)>>.Int; + my Int @num = $number.comb(/\d/)>>.Int; given @num { when .elems == 11 { die @errors[0] if .[0] !== 1; -- cgit 1.4.1-2-gfad0