Perlito5 - perl6 - class definition in a block (fix)