#!/usr/bin/perl

use strict;
use GD::Simple;

GD::Simple->class('GD::SVG');

my $img = GD::Simple->new(500,500);
$img->bgcolor('white');
$img->fgcolor('blue');

my $g1 = $img->newGroup('circle in square');
$g1->rectangle(100,100,400,400);
$g1->moveTo(250,250);

my $g2 = $g1->newGroup('circle and boundary');
$g2->fgcolor('black');
$g2->bgcolor('red');
$g2->ellipse(200,200);

print $img->svg;

##</code><code>##

$ perl test.pl 
Can't locate auto/GD/newGroup.al in @INC (@INC contains: /etc/perl /usr/local/lib/x86_64-linux-gnu/perl/5.20.0 /usr/local/share/perl/5.20.0 /usr/lib/x86_64-linux-gnu/perl5/5.20 /usr/share/perl5 /usr/lib/x86_64-linux-gnu/perl/5.20 /usr/share/perl/5.20 /usr/local/lib/site_perl .) at /usr/lib/x86_64-linux-gnu/perl5/5.20/GD/Simple.pm line 1007.