GNU Linux Портал :: Новости, форумы, библиотека статей :: Локальные системы / Клиентские программы

LINUXPORTAL.RU | Живое общение LinuxPortal.Ru | Ленты событий

Участники

Поиск

F.A.Q.

Регистрация

Вход

Начало

Начало » Для администраторов и программистов » Локальные системы / Клиентские программы » Perl вывод результата голосования

Показать: Сегодняшние сообщения :: Показать голосования :: Навигатор по сообщениям

Отправить по e-mail

Переключение в режим просмотра в виде древовидного списка сообщений и ответов

Perl вывод результата голосования

Пнд, 28 Сентябрь 2009 14:08

fryze

Сообщений: 32
Зарегистрирован: Май 2009

Освоившийся

Всем здрасти! Есть скрипт который подсчитывает голоса и хранит результаты в массиве. Вот теперь пришла пора выводить результаты на html страничку(Хочется результаты поиметь в виде графика) в процентном отношении относительно общей массы голосов. Кто как посоветует это осуществить? Лично моё виденье этого - задание процентной величины ячейки таблицы с определённым цветом бэгграунда. Например:

<table width="500px">
<tr><th>Результаты голосования<th></tr>
<tr>
<td>
1-pers
</td>
<td width="80%">
<table width="100%">
<tr>
<td WIDTH="95%" HEIGHT="12px" BGCOLOR="red">
</td>
<td>
</td>
</tr>
</table>
</td>
</tr>

<tr>
<td>
2-pers
</td>
<td width="80%">
<table width="100%">
<tr>
<td WIDTH="5%" HEIGHT="12px" BGCOLOR="green">
</td>
<td>
</td>
</tr>
</table>
</td>
</tr>

Какие способы можете предложить вы?

Известить модератора

Отправить личное сообщение этому участнику

Re: Perl вывод результата голосования

Срд, 07 Октябрь 2009 16:11

fryze

Сообщений: 32
Зарегистрирован: Май 2009

Освоившийся

Выбрана именно эта тактика отрисовки графика.
Сразу скажу какой подводный камень я поймал.


<table width="500px">
<tr><th>Результаты голосования<th></tr>
<tr>
  <td>
    1-pers
  </td>
  <td width="80%">
    <table width="100%">
      <tr>
        <td width="{$peremennaya}%%" height="12px" bgcolor="green">
        </td>
        <td>
        </td>
      </tr>
    </table>
  </td>
</tr>


<tr>
  <td>
    2-pers
  </td>
  <td width="80%">
    <table width="100%">
      <tr>
        <td width="{$peremennaya}%" height="12px" color="green">
        </td>
        <td>
        </td>
      </tr>
    </table>
  </td>
</tr>
</table>

При таком вот раскладе если в результате вычислений переменная, которая определяет ширину ячейки будет меньше 1%, то ячейка начинает занимать 50% автоматически, поэтому нужно дописать дополнительный перебор значений и если они меньше 1, то присвоить им значение 1.
Всё ещё жду предложений по более лучшей реализации.

[Обновления: Срд, 07 Октябрь 2009 16:12]

Известить модератора

Re: Perl вывод результата голосования

Срд, 25 Ноябрь 2009 22:56

marlik

Сообщений: 54
Зарегистрирован: Май 2009

Освоившийся

Есть вариант выводить символ '|' , ну а проценты высчитывать из расчета ширины таблицы, ведь если кто-то наберет больше процентов чем размер твоей таблицы получится фигня... например сравнивать самое маленькое количество голосов и самое большое и определенным образом урезать количество символов в выводе '|', что-бы самое маленькое значение голосов не получилось меньше нуля... и самое большое не превышало ширины таблицы...

Надеюсь доходчиво объяснил свою мысль :)) программа усложняется не так-ли? :))

Ну и второй вариант, использовать модуль GD; для рисования...

[Обновления: Срд, 25 Ноябрь 2009 23:00]

Известить модератора

Re: Perl вывод результата голосования

Срд, 09 Декабрь 2009 15:06

fryze

Сообщений: 32
Зарегистрирован: Май 2009

Освоившийся

marlik писал(а) Срд, 25 Ноябрь 2009 22:56

Есть вариант выводить символ '|' , ну а проценты высчитывать из расчета ширины таблицы, ведь если кто-то наберет больше процентов чем размер твоей таблицы получится фигня...

Попробуй перечитывать то что пишешь перед публикацией, а то действительно получается фигня :)

marlik писал(а) Срд, 25 Ноябрь 2009 22:56

если кто-то наберет больше процентов чем размер твоей таблицы

:-D :-D :-D

Известить модератора

Re: Perl вывод результата голосования

Чтв, 10 Декабрь 2009 13:37

marlik

Сообщений: 54
Зарегистрирован: Май 2009

Освоившийся

Мда, мало того что Вы страдаете скудоумием, так еще и исправляться, я смотрю, желания у Вас не возникает.

Человек знавший Перл, тормозит в html-верстке... :))

Вот Вам образец который нужен я полагаю...

<html>
<body>
<table width="600px" border='1'>
<tr>
<td width="600px">Результаты голосования</td>
</tr>
</table>

<table width="600px" border='1'>
        <tr>
        <td width="70px" height="12px" color="">aaa</td>
        <td width="24px" height="12px" align="left" bgcolor="red"></td>
        <td height="12px" color=""></td>
        </tr>
</table>
<table width="600px" border='1'>
        <tr>
        <td width="70px" height="12px" color="">bbb</td>
        <td width="14px" height="12px" align="left" bgcolor="green"></td>
        <td height="12px" color=""></td>
        </tr>
</table>
<table width="600px" border='1'>
        <tr>
        <td width="70px" height="12px" color="">ccc</td>
        <td width="4px" height="12px" align="left" bgcolor="blue"></td>
        <td height="12px" color=""></td>
        </tr>
</table>
</body>
</html>

Далее, если возникнет ситуация со значением переменной...

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

Проверяем...

if(!$peremenaiya){
# В переменной отсутствует значение, чо-нить делаем...
}else{
# В переменной есть значение, выводим...
}

К сожалению не видел ваш скрипт, поэтому не знаю, как высчитываются Ваши проценты, я предлагал вариант с выводом символа, ну или пиксель, а с учетом того что Ваша таблица выставлена в 500px, то размер может закончится, и получится полная фигня... ну или если играться и смешивать проценты и пиксели то тоже получиться полная фигня... :))

И наконец, почитайте книги... у Перла есть такой модуль CGI-называется, много чего с ним можно делать... а в частности генерить html-страницы, формы, таблицы...

З. ы. Я бы на Вашем месте не оффтопил здесь, сходите на форум програмистов, http://forum.vingrad.ru/ там Вам помогут... Покеда.

Известить модератора

Re: Perl вывод результата голосования

Чтв, 10 Декабрь 2009 22:09

fryze

Сообщений: 32
Зарегистрирован: Май 2009

Освоившийся

Давай сразу на ты. В общем предложение ясно. Первая мысль у меня тоже в этом была. Но тут сталкиваешься с проблемой того, что либо делаешь длину графика 100 px (именно графика. Того самого участка на странице, на котором будут цветные строки), либо придётся проводить дополнительные вычисления по отношению велечены графика и процентов каждой позиции в голосовании.(если график будет равен 200px, то 1 процент в голосовании будет прибавлять 2px к длинне строки позиции) Это фигня, но вот если длинна графика не 200, а 150 или 175. Тут проблема. Просто скрипт работает ни на одном сайте, и как следствие у области графика разная величина на каждом ресурсе.

Известить модератора

Re: Perl вывод результата голосования

Вск, 13 Декабрь 2009 01:33

marlik

Сообщений: 54
Зарегистрирован: Май 2009

Освоившийся

За тебя написать? :))

Известить модератора

Re: Perl вывод результата голосования

Срд, 16 Декабрь 2009 17:41

fryze

Сообщений: 32
Зарегистрирован: Май 2009

Освоившийся

Решение должно быть целесообразно, т.е. оно должно либо быть менее ёмким, либо отрабатывать быстрее. Если оно отвечает этим условиям, то да.

Известить модератора

Re: Perl вывод результата голосования

Чтв, 17 Декабрь 2009 21:57

marlik

Сообщений: 54
Зарегистрирован: Май 2009

Освоившийся

Немного занят, поэтому если срочно обратись на фриланс биржу, если не очень, то было-бы неплохо какое-нибудь ТЗ.

Известить модератора

Предыдущая тема:	проблема с VPN
Следующая тема:	использование библиотек в модуле ядра

Переход к форуму:

-=] Вернуться вверх [=-

[ Сформировать XML ] [

]

Текущее время: Сбт Июл 31 17:38:25 MSD 2010

.:: Обратная связь :: Начало ::.

©"Linuxportal.Ru". Материалы сайта можно использовать свободно при условии сохранения этой свободы при дальнейшем распространении, если явно не указано иное.

Дизайн и программирование: ,

Поставьте нашу кнопку: