../../Task/Digital-root-Multiplicative-digital-root/Perl-6