use v6;
use SVG;

my $r = 150 / 2;

my @parts = :circle[
    cx      => $r,
    cy      => $r,
    r       => $r,
    style   => 'fill:none; stroke: black; stroke-width: 1',
];

for 0, 2 ...^ 360 -> $degrees {
    my $rad = $degrees / 360 * 2 * pi;
    @parts.push: 'line' => [
        x1  => $r,
        y1  => $r,
        x2  => $r + $r * cos($rad),
        y2  => $r + $r * sin($rad),
        style   => 'stroke: black; stroke-width: 1',
    ];
}

say SVG.serialize:
    'svg' => [
        width  => 2 * $r,
        height => 2 * $r,
        @parts,
    ];