The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]




Версия для распечатки Пред. тема | След. тема
Новые ответы [ Отслеживать ]
Можно ли строить графики на perl и передавать их в окно браузера?, !*! anonymous, 12-Сен-03, 11:35  [смотреть все]
Я абсолютно не знаю возможностей perl, поэтому подскажите, пожалуйста, как лоху, можно ли сделать так, чтобы клиент web-сервера посылал запрос , а тот его обрабатывал с помощью perl и выдавал результат для клиента в виде графика?
  • Можно ли строить графики на perl и передавать их в окно брау..., !*! Алексей, 12:33 , 15-Сен-03 (1)
    >Я абсолютно не знаю возможностей perl, поэтому подскажите, пожалуйста, как лоху, можно
    >ли сделать так, чтобы клиент web-сервера посылал запрос , а тот
    >его обрабатывал с помощью perl и выдавал результат для клиента в
    >виде графика?


    Юзать модуль GD

    • Можно ли строить графики на perl и передавать их в окно брау..., !*! шторм, 04:44 , 16-Сен-03 (2)

      >Юзать модуль GD


      Если заработает)))

      • Можно ли строить графики на perl и передавать их в окно брау..., !*! bogerm, 05:02 , 16-Сен-03 (3)
        >
        >>Юзать модуль GD
        >
        >
        >Если заработает)))

        Прекрасно работает в mrtg например. Но еще проще графики строить прямо в gnuplot и передавать обратно в программу в виде картинки через pipe.

        • Можно ли строить графики на perl и передавать их в окно брау..., !*! konst, 13:24 , 16-Сен-03 (4)
          >>
          >>>Юзать модуль GD
          >>
          >>
          >>Если заработает)))
          >
          >Прекрасно работает в mrtg например. Но еще проще графики строить прямо в
          >gnuplot и передавать обратно в программу в виде картинки через pipe.
          >
          Можно передать результат gnuplota в броузер?
          Можно краткий пример кода (сама схема)...?


          • Можно ли строить графики на perl и передавать их в окно брау..., !*! Dracula, 16:02 , 17-Сен-03 (5)
            #!/usr/bin/perl -w
            use Chart::Lines;
            use Tie::IxHash;

            open (IPA, "/usr/local/bin/ipastat -R inet-in  -i /0-/23:59  -n -e |");
            $line = <IPA>;
            while ($line=<IPA>) {
            $line =~ s/\s+/ /;
            chomp $line;
            my ($a101, $b101, $c101, $d101, $e101, $f101) = split (/ /, $line, 6);

            #$now = `date +%H.%M`;
            $obj = Chart::Lines->new(90, 200);
            $myhour24 = `date +%H.%M`;
            @data = ( [ '', 'inet' ],
            [ $f101, $f101]);
            $obj->set ('title' => 'Inet_ALL',
                    'legend' => 'none',
            #       'graph_border' =>10,
                    'brush_size' => 5,
                    'x_ticks' => 'normal',
                    'x_label' => $myhour24,
            #        'max_val' => $scl_max24,
            #        'min_val' => $scl_min24,
            #        'tick_len' => 10,
            ##       'skip_x_ticks' => 12,
                    'transparent' => 'true',
                    'grey_background' => 'true',
                    'y_label' => 'inet_in_rule_101',
                    'grid_lines' => 'true',
            #        'spaced_bars' => 'false',
                    'colors' => {
                            'background' => [255,255,255],
                            'x_grid_lines' => [155,186,214],
                            'y_grid_lines' => [155,186,214],
                            'text' => [60,40,140],
                            'dataset1' => [130,130,130]
            }
            );
            $obj->png ("/patch_to_site/1.png", \@data);
            }
            close IPA;

            ===============================================
            Самодельная фигня , но работает.
            xx.png  ставиш в HTML <img src....>  и смотриш
            Данный пример смотрит ipastat ,  можно напрямую  c ipfw show .
            Поставить надо модули для перла  см. выше.
            Сдесь не справился только с осью времени , поэтому графики как градусники Ж)
            Сам скрипт в крон.А вообще MRTG  красивее , и те же команды прилепил туда .Короче работет и там и там.
              

          • Можно ли строить графики на perl и передавать их в окно брау..., !*! bogerm, 04:42 , 18-Сен-03 (6)
            >Можно передать результат gnuplota в броузер?
            >Можно краткий пример кода (сама схема)...?

            Конечно можно. Я точно сейчас не вспомню протокол HTTP - нужно смотреть RFC или w3c.org...
            Но идея такая - перловый скрипт без параметров выдает html code. со специальным параметром
            он должен напечатать что-то вроде Content-Type: image/png; qs=0.5 и расставить нужное количество переводов строки. Потом просто в бинарном виде выводим картинку в формате PNG:

            open (GP, "|/usr/local/bin/gnuplot") or die "no gnuplot";
            use FileHandle;
            GP->autoflush(1);
            print GP,"set term png;plot sin(x)\n";
            close GP

            в хтмл-ном коде должно быть что-то вроде <IMG SRC="http://myserver.org/cgi-bin/myscript.pl?plotit">




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру