summary refs log blame commit diff stats
path: root/raku/raindrops/Raindrops.rakumod
blob: 3b410658469fb2deb86da198fc5f88e7f04fe069 (plain) (tree)
1
2
3
4
5
6
7
8
9








                                          
unit module Raindrops;

sub raindrop(Int $num --> Str) is export {
    my Str $res;
    $res ~= "Pling" if $num %% 3;
    $res ~= "Plang" if $num %% 5;
    $res ~= "Plong" if $num %% 7;
    return $res // $num.Str;
}