tracks/perl6/exercises/raindrops/.meta/solutions/Raindrops.pm6 in trackler-2.2.1.137 vs tracks/perl6/exercises/raindrops/.meta/solutions/Raindrops.pm6 in trackler-2.2.1.138
- old
+ new
@@ -1,7 +1,7 @@
-unit module Raindrops:ver<2>;
+unit module Raindrops:ver<3>;
-sub convert (Int:D $num --> Str:D) is export {
+sub raindrop (Int:D $num --> Str:D) is export {
my $str = '';
given $num {
when * %% 3 {$str ~= 'Pling'; proceed}
when * %% 5 {$str ~= 'Plang'; proceed}
when * %% 7 {$str ~= 'Plong'}