tracks/perl6/exercises/luhn/Example.pm6 in trackler-2.2.1.61 vs tracks/perl6/exercises/luhn/Example.pm6 in trackler-2.2.1.62
- old
+ new
@@ -1,5 +1,5 @@
-unit module Luhn:ver<1>;
+unit module Luhn:ver<2>;
sub is-luhn-valid ($input is copy) is export {
$input ~~ s:g/\s+//;
return False if $input.chars < 2 || $input ~~ /\D/;
my @num = $input.split('', :skip-empty);