Perlito5 - perl5, js - emit map-BLOCK