Perl6 adaptation until not implemented multi index wall found