use Perl6::Form;
print form '{]].[}', [0,1];
##</code><code>##

###.##
  1.0

##</code><code>##

print form '{]]].[}', [0,1];

0.00.
   1.0