# Perl 6 code here
given $svg-canvas {
   .rect: x => 5, y => 5, height => 90, width => 190;
   .circle: cx => 100, cy  => 50, r => 20, style => 'fill: black';
   .text: 'Some caption', x => 20, y => 15;
   # etc. 
}