my $real = $graph->gd; my $red = $real->colorAllocate(255,0,0); $real->arc(290,150,10,10,0,360,$red);