Forum Webscript.Ru

Программирование => Perl => Тема начата: Aser от 15 Мая 2004, 14:23:08

Название: Modul GD
Отправлено: Aser от 15 Мая 2004, 14:23:08

Люди я установил сабжевый модуль под Перл, но на локальном серваке почему-то графики не стоятся. Для  тестирования использую скрипт:
#!/usr/bin/perl
        use GD;
 
       # create a new image
        $im = new GD::Image(100,100);
        # allocate some colors
        $white = $im->colorAllocate(255,255,255);
        $black = $im->colorAllocate(0,0,0);      
        $red = $im->colorAllocate(255,0,0);      
        $blue = $im->colorAllocate(0,0,255);
        # make the background transparent and interlaced
        $im->transparent($white);
        $im->interlaced(\'true\');
        # Put a black frame around the picture
        $im->rectangle(0,0,99,99,$black);
        # Draw a blue oval
        $im->arc(50,50,95,75,0,360,$blue);
        # And fill it with red
        $im->fill(50,50,$red);
        # make sure we are writing to a binary stream
        binmode STDOUT;
        # Convert the image to PNG and print it on standard output
        print $im->png;

Браузер выдает 500-ю ошибку.

В логе access.log
127.0.0.3 - - [11/May/2004:13:50:42 +0400] "GET /cgi-bin/tools/configure.pl HTTP/1.1" 500 599

Что может быть не так... Может я где-то что-то не так сделал.. Устанавливал командой ppm install GD.pdd

Название: Modul GD
Отправлено: ondr от 15 Мая 2004, 14:56:53

глянь в error.log

Название: Modul GD
Отправлено: Aser от 15 Мая 2004, 16:08:25

Глянул. Вот что там.
[Sat May 15 14:20:33 2004] [error] [client 127.0.0.3] Premature end of script headers: i:/home/serv3/cgi-bin/gdd.pl

Название: Modul GD
Отправлено: ondr от 15 Мая 2004, 16:23:34

Что и следовало ожидать ;)
Нужно отправить правильный заголовок.

Название: Modul GD
Отправлено: Aser от 15 Мая 2004, 16:45:33

Что и где испралять ? подскажи плииз.
Потому как данный скрипт лежит в сети
http://www.aser.net.ru/cgi-bin/gdd.pl и все работает :(

Название: Modul GD
Отправлено: glebushka от 15 Мая 2004, 18:26:06

перед print $im->png; вставь строчку:
print "Content-type: image/png\\n\\n";

Название: Modul GD
Отправлено: Aser от 15 Мая 2004, 20:15:12

Ок. Этот заработал. Нужно будет с синтасис поботать. Спасибо.

Название: Modul GD
Отправлено: glebushka от 15 Мая 2004, 20:24:04

Цитировать

Aser:
Нужно будет с синтасис поботать

лучше уж тогда погуглить, вяснив что это за ошибка такая "Premature end of script headers" и что такое http-заголовки. До полного просветления. А синтаксис тут не причём.

Название: Modul GD
Отправлено: Aser от 19 Мая 2004, 02:28:01

А не подскажешь где в инете можно найти примеры (которые можно будет скачать) построения разных графиков, чтобы как функцииям отдавать значения и они строили графики разные. Я был бы очень благодарен за такую информацию. Хочу сделать графики такие как у AWStats строятся, а времени очень мало диплом уже скоро сдавать...

Название: Modul GD
Отправлено: NeoNox от 19 Мая 2004, 11:35:05

Aser В папке demos возле GD.pm находятся примеры.
Можешь их взять и с CPAN:
http://search.cpan.org/src/LDS/GD-2.12/demos/
Также на CPAN есть много других модулей которые тебе могут подойти - ищи.

Название: Modul GD
Отправлено: Aser от 19 Мая 2004, 23:08:35

Посмотрел, там только примиивные рисунки , квадратики треугольнички. Графиков я не нашел...

Название: Modul GD
Отправлено: Phoinix от 20 Мая 2004, 09:41:57

Aser
AFAIK график более примитивный рисунок чем квадрат, так как состоит из одних отрезков... ;)

Название: Modul GD
Отправлено: NeoNox от 20 Мая 2004, 10:47:10

Aser модуль GD::Graph ті так и не нашел?
http://search.cpan.org/src/MVERB/GDGraph-1.43/samples/

Название: Modul GD
Отправлено: Aser от 30 Мая 2004, 22:45:32

Похоже я полный чайник :(.... Примеры нашел, выкачал, но вот незадача запустить не могу. понимаю что это типа графики, смотрю что нужно, но они не запускаются....