aboutsummaryrefslogtreecommitdiff
path: root/challenge-007/finley/perl6/ch-1.p6
blob: 2f804ce004ce28bf6ddc5edf00243d3c8a0c2a64 (plain)
1
2
3
4
5
use v6.d;

say 'Challenge 1';
say 'The following numbers between 0 and 50 inclusive are divisible by the sum of their digits';
.say if ($_ %% [+] .comb) for 0..50;