Фоновое изображение в столбцах графика - PullRequest
Новая
       2

Фоновое изображение в столбцах графика

2 голосов
/ 30 ноября 2010

У меня есть cgi-скрипт, который рисует график.Вот код: 

#!/usr/bin/perl -w

use CGI ':standard';
use GD::Graph::bars;
use strict;

my @data = (["Jan", "Feb", "Mar", "Apr", "May", "Jun", 
             "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"],
            [23, 5, 2, 20, 11, 33, 7, 31, 77, 18, 65, 52]);

my $mygraph = GD::Graph::bars->new(500, 300);
$mygraph->set(
    x_label => 'Month',
    y_label => 'Number of Hits',
    title   => 'Number of Hits in Each Month in 2002',
    dclrs   => ['cyan']
) or warn $mygraph->error;

my $myimage = $mygraph->plot(\@data) or die $mygraph->error;

print "Content-type: image/png\n\n";
print $myimage->png;

Все столбцы имеют голубой цвет.Итак ...

У вас есть идеи, как разместить изображение в столбцах вместо цвета?

Я искал в Интернете об этом, но ничего подобного я не смог найти.Я хотел бы использовать только GD.pm без использования дополнительных модулей, таких как ImageMagick.

1 Ответ

1 голос
/ 30 ноября 2010

Я не знаю. Вы можете создать фоновое изображение для всего графика, указав опцию логотипа. 

$mygraph->set(
    x_label => 'Month',
    y_label => 'Number of Hits',
    title   => 'Number of Hits in Each Month in 2002',
    dclrs   => ['cyan'],
    logo => 'mydog.png',
) or warn $mygraph->error;

Но я не думаю, что вы можете поместить изображение только в столбцы.

...