../../Task/Binary-strings/Perl-6