../../Task/Middle-three-digits/Perl-6