Создание круговой диаграммы с помощью модуля GD::Graph
Категория реферата: Рефераты по информатике, программированию
Теги реферата: сборник изложений, шпаргалки бесплатно
Добавил(а) на сайт: Klinskih.
Предыдущая страница реферата | 1 2 3 | Следующая страница реферата
22 start_angle => 90,
23 suppress_angle => 5,
24 )
25 or warn $graph->error;
26
27 $graph->set_title_font("/usr/share/fonts/ttf/windows/times.ttf",18);
28 $graph->set_value_font("/usr/share/fonts/ttf/windows/times.ttf",12);
29 $graph->set_label_font("/usr/share/fonts/ttf/windows/times.ttf",14);
30
31 $graph->plot(@data) or die $graph->error;
32
33 open(GRAPH,">graph.jpg") || die "Cannot open graph.jpg: $!n";
34 print GRAPH $graph->gd->jpeg(100);
В строке 3 приведенного листинга мы загружаем модуль Text::CSV_XS, скачать бесплатную версию которого можно на CPAN (Comprehensive Perl Archive Network). В строке 7 создаем новый объект класса Text::CSV_XS, открываем CSV-файл в строке 8 и считываем данные из файла в массив @data (строки 9-13). Строка 10 вызывает метод parse(), который разбивает строки файла по колонкам. Сформированные колонки возвращаются с помощью метода fields() в строке 11 и добавляются в виде ряда в массив @data (строка 12). Другими словами, вместо формирования массива @data вручную, мы можем создать его из внешнего файла (в данном случае - CSV).
Далее (в строке 15) создаем объект диаграммы нужной разновидности (в данном случае - pie) с заданным размером изображения.
Третий параметр в строке 21 равен 1, что подразумевает создание трехмерной круговой диаграммы (значение "0" выводит двумерный график и используется по умолчанию). Далее необходимо определить начальную точку построения диаграммы, с которой скрипт будет начинать отсчет секторов графика. Значение задается в градусах и по умолчанию равно "0" (мы установили значение "90", строка 22). Также мы можем установить нужное значение параметра suppress_angle, который определяет минимальный размер сектора круговой диаграммы в градусах.
При желании можно использовать шрифты TrueType вместо встроенных. В строках 27-29 указываются названия гарнитур, использующихся, соответственно, для заголовка диаграммы, наименования секторов и пояснительных подписей к графику. Цифры, идущие после указания гарнитур, означают установленный размер шрифта.
В строке 33 выводится изображение круговой диаграммы в файл в формате JPEG (или PNG). В следующей строке параметром метода jpeg() можно задать степень оптимизации (качества) изображения (в процентах).
В данном случае изображение диаграммы выводится в файл в графическом формате, однако можно его вывести в стандартный поток вывода STDOUT. Это может потребоваться для создания "налету" диаграмм отображения динамически изменяющихся данных на веб-странице. Для этого придется несколько видоизменить вышеприведенный код программы.
Листинг 1
32 print "Content-type: image/jpegnn";
33 binmode(STDOUT);
34 print $graph->gd->jpeg(100);
Чтобы вывести круговую диаграмму на веб-странице, в нужном месте документа следует вставить следующую HTML-конструкцию:
Рекомендуем скачать другие рефераты по теме: изложение 3, сестринские рефераты.
Предыдущая страница реферата | 1 2 3 | Следующая страница реферата