#!perl6
use v6;
use XML::Writer;

my $svg = svg => [
    :width(200), :height(200),
    circle => [
        :cx(100), :cy(100), :r(50)
    ],
];

say XML::Writer.serialize($svg);
