Модераторы: korob2001, ginnie

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Black::CGI, обсуждение модуля 
:(
    Опции темы
korob2001
Дата 18.3.2006, 11:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61
Цитата(Phoinix @ 18.3.2006, 08:24 Найти цитируемый пост)

И еще: В своих скриптах я часто использую некоторые переменные которые постоянно передаются между пользователем и сервером, например, уникальный ключ сессии, так вот этот параметр проверяется сразу при запуске скрипта, а передаваться он может как POST'ом так и GET'ом... А ты взял и разделил данные... Если честно, то это сделано по типу PHP и мне такая реализация ну совсем не нравится, при использовании PHP мне приходится делать двойные проверки... А смысл? Я лично не могу себе представить, что буду одновременно передавать разные(!) данные под одним и тем же именем, но разными методами...

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

Это сообщение отредактировал(а) korob2001 - 18.3.2006, 11:47


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
BlackLFL
Дата 18.3.2006, 23:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
Цитата(Phoinix @ 18.3.2006, 12:24 Найти цитируемый пост)
Вот честно, думаю, думаю, а зачем мне данные объекта? Никак не приложу ума нафиг они мне нужны...

посмотрел еще раз стороние реализации, нигде не нашел, всегда разбираются данные, при создание экземпляра ... так что наверно я перестарался ... сделал разбор сразу ...

Цитата(Phoinix @ 18.3.2006, 12:24 Найти цитируемый пост)
Ну так надо сделать алгоритм, который проверяет, переполнена папка или нет, и в случае чего чичтить их, если указан, скажем, какой-либо ключ при инициализации объекта...

хорошая идея, добавил параметр clear_temp_folder, метод сделал приватным.
Поумолчанию функция очистки отключена ...

Код

my $cgi = Black::CGI->new( clear_temp_folder => 1 );


Цитата(Phoinix @ 18.3.2006, 12:24 Найти цитируемый пост)
И еще: В своих скриптах я часто использую некоторые переменные которые постоянно передаются между пользователем и сервером, например, уникальный ключ сессии, так вот этот параметр проверяется сразу при запуске скрипта, а передаваться он может как POST'ом так и GET'ом... А ты взял и разделил данные... Если честно, то это сделано по типу PHP и мне такая реализация ну совсем не нравится, при использовании PHP мне приходится делать двойные проверки... А смысл? Я лично не могу себе представить, что буду одновременно передавать разные(!) данные под одним и тем же именем, но разными методами...

согласен с korob2001, методы должны быть разделены ...

Цитата(korob2001 @ 18.3.2006, 12:46 Найти цитируемый пост)
Просто нужно добавить возможность и их совместного использования, для передачи тех же ключей сессии, так как сессия должна сохраниться не в зависимости от метода передачи данных.

я сейчас подумаю как это реализовать ... есть идеи?
PM WWW   Вверх
korob2001
Дата 19.3.2006, 02:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61
Можно добавить метод который смешивает оба хеша и возвращает ссылку на новый анонимный хеш. Я назвал бы его param:
Код

sub param {
        my $self = shift;
        return {%{$self->{get}},%{$self->{post}}};
}

C другой стороны это пожалуй далеко не лучший вариант. Можно получать в методе param имя параметра, проверять оба метода и возвращать value.
Код

sub param {
        my $self = shift;
        return $self->{post}{$_[0]} || $self->{get}{$_[0]};
}

Хотя мне кажется парвильнее делать вот такую проверку:
Код

sub param {
        my $self = shift;
        return exists ${$self->{post}}{$_[0]} ? $self->{post}{$_[0]} :
               exists ${$self->{get}}{$_[0]}  ? $self->{get}{$_[0]}  : undef;
}


Это сообщение отредактировал(а) korob2001 - 19.3.2006, 03:06


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
BlackLFL
Дата 19.3.2006, 11:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
ты читаешь мои мысли, ночью тоже самое приснилось smile

Цитата

Код

sub param {
    my $self = shift;
    return exists ${$self->{post}}{$_[0]} ? $self->{post}{$_[0]} :
        exists ${$self->{get}}{$_[0]}  ? $self->{get}{$_[0]}  : undef;
}


следовательно
Код

# POST = "";
# GET = "73427842742"

my $session = $cgi->param('session');

исходя из твоего предложения, мы неполучим ничего ...
может лучше все-таки воспользоваться вторым вариантом?
Код

sub param {
    my($self, $name) = @_;

    return $self->{'post'}->{$name} || $self->{'get'}->{$name};
}

в этом случае мы получим значение GET 73427842742
как ты думаешь?

p.s. приоритет наверно за POST оставим?
PM WWW   Вверх
korob2001
Дата 19.3.2006, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61
Цитата(BlackLFL @ 19.3.2006, 08:24 Найти цитируемый пост)
исходя из твоего предложения, мы неполучим ничего ...

Почему?

Цитата(BlackLFL @ 19.3.2006, 08:24 Найти цитируемый пост)
может лучше все-таки воспользоваться вторым вариантом?
Код

sub param {
    my($self, $name) = @_;

    return $self->{'post'}->{$name} || $self->{'get'}->{$name};
}

в этом случае мы получим значение GET 73427842742
как ты думаешь?

А как же быть с параметром prm=0 ?


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
BlackLFL
Дата 19.3.2006, 12:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
Цитата(korob2001 @ 19.3.2006, 13:28 Найти цитируемый пост)
А как же быть с параметром prm=0 ?

об этом я и не подумал ...

тогда делаем окончательный вариант
Код

### Функция возврата объединяющая POST, GET
sub param {
    my($self, $name) = @_;
    return exists $self->{'post'}->{$name} ? $self->{'post'}->{$name} : 
           exists $self->{'get'}->{$name} ? $self->{'get'}->{$name} : undef;
}

поддерживаешь?

ты так и не ответил про приоритет ...
PM WWW   Вверх
korob2001
Дата 19.3.2006, 15:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 13
Всего: 61
Цитата(BlackLFL @ 19.3.2006, 09:56 Найти цитируемый пост)
поддерживаешь?

Ну пока лучшего варианта в голову не приходит, так что можно добавить, если будет лучший вариант то никогда не поздно подправить.
Цитата(BlackLFL @ 19.3.2006, 09:56 Найти цитируемый пост)
ты так и не ответил про приоритет ...

Оставляй приоритет за post, хотя думаю это не столь важно, так как нельзя заранее предугадать какой из методов будет использоваться чаще.
Вот ещё как вариант:
Код

sub param {
        my $self = shift;
        return keys %{$self->{post}} ? $self->{post}{$_[0]} : $self->{get}{$_[0]};
}


Это сообщение отредактировал(а) korob2001 - 19.3.2006, 15:21


--------------------
"Время проходит", - привыкли говорить вы по неверному пониманию. 
"Время стоит - проходите вы".
PM MAIL WWW ICQ MSN   Вверх
BlackLFL
Дата 17.4.2006, 11:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
модуль обновился до версии 0.2

Еще раз выражаю огромное спасибо всем, кто принимает участие в тестирование модуля, высказывают свои пожелания и замечания!

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

Это сообщение отредактировал(а) BlackLFL - 17.4.2006, 11:06
PM WWW   Вверх
BlackLFL
Дата 21.2.2007, 20:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
модуль обновился до версии 0.3

Еще раз выражаю огромное спасибо всем, кто принимает участие в тестирование модуля, высказывают свои пожелания и замечания!

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

Это сообщение отредактировал(а) BlackLFL - 21.2.2007, 20:57
PM WWW   Вверх
ochnev
Дата 1.3.2007, 03:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 253
Регистрация: 27.3.2006

Репутация: нет
Всего: нет
А почему из готового модуля нужно убирать "use strict"?
PM MAIL   Вверх
Nab
Дата 1.3.2007, 06:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 8
Всего: 37
Цитата(ochnev @  1.3.2007,  03:05 Найти цитируемый пост)
А почему из готового модуля нужно убирать "use strict"?

Убирать не обязательно, просто в готовом отлаженном модуле она не нужна... какуюто, хоть и не большую но явно лишнюю нагрузуку он создает. А если весь код отлажен, то почему бы не убрать?....



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

Ведь его получается можно использовать только в новых разработках, заменить им, более легким, CGI.pm в старых проектах не представляеется возможным,  слишком трудоемкий процесс получиться smile они не совместимы никак smile Также заменить Ваш модуль, если он перестанет удовлетворять функционалу приложения, тоже затруднительно. Тоесть его можно заюзать только в мелких законченных решениях...

Просто я сейчас разрабатываю достаточно оьбъемный проект, и там как базовая возможность по работе с cgi - окружением используется именно CGI.pm. Так было задумано не мной, но я вполне поддержую эту стратегию, потому как этот модуль есть практически везде... 
И что более важно, к нему есть расширения, и альтернативы. Расширение типа CGI::Compress::Gzip, позволяют очень просто добавить к своему приложению gzip сжатие, что сейчас и востребовано и необходимо и все чаще используется...
А альтернативы, это в первую очередь CGI::Simple, сравнение по скорости можно глянуть вот здесь http://search.cpan.org/src/JFREEMAN/Cgi-Si..._vs_cgi-pm.html . Также есть еще CGI::Minimal, для работы с параметрами очень даж не плох, но необходимой мне совместимости не имеет smile... хотя там уже присутствует функционал, для которого я подключаю внешние модули... 
Есть еще некоторые альтернативы, но они менее совместимы...

Я это все к тому, что, если бы Ваш модуль, предоставлял интерфейс более совместимый с CGI.pm, пускай и не в полном объеме, то количество пользователей и и широта использования думаю выросли бы ...




--------------------
 Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community 
FREESCO in Ukraine 
PM MAIL   Вверх
Vaneska
Дата 29.8.2007, 20:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 141
Регистрация: 15.3.2005
Где: Москва

Репутация: 1
Всего: 4
Потестил, нашел баг.
В $ENV{'CONTENT_TYPE'} не всегда передается только строчка application\/x-www-form-urlencoded,
поэтому при таком условии:
Код

if ( uc( $ENV{'REQUEST_METHOD'} ) eq "POST" && $ENV{'CONTENT_TYPE'} eq 'application\/x-www-form-urlencoded' )

запрос не обрабатывается. Надо бы поставить регексп, как в условии для multipart/form-data
--------------------
http://isokolov.blogspot.com/
PM MAIL ICQ   Вверх
BlackLFL
Дата 30.8.2007, 11:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 15.9.2005
Где: Москва

Репутация: 3
Всего: 12
Цитата(Vaneska @ 29.8.2007,  21:49)
Потестил, нашел баг.
В $ENV{'CONTENT_TYPE'} не всегда передается только строчка application\/x-www-form-urlencoded,
поэтому при таком условии:
Код

if ( uc( $ENV{'REQUEST_METHOD'} ) eq "POST" && $ENV{'CONTENT_TYPE'} eq 'application\/x-www-form-urlencoded' )

запрос не обрабатывается. Надо бы поставить регексп, как в условии для multipart/form-data

Спасибо подправил.

Добавлено @ 11:18
2Nab, прошу прощения за долгий ответ, не было возможности ответить сразу, а потом забыл :(
Полностью с Вами согласен, функционал отличается кардинально, сам столкнулся с интеграцией в большой проект ...

Цитата

Также заменить Ваш модуль, если он перестанет удовлетворять функционалу приложения, тоже затруднительно.

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

Цитата

Расширение типа CGI::Compress::Gzip, позволяют очень просто добавить к своему приложению gzip сжатие, что сейчас и востребовано и необходимо и все чаще используется...

Бесспорно, минус, но не для всех проектов, например, для внутренний разработок, он не нужен ИМХО.

Цитата

Я это все к тому, что, если бы Ваш модуль, предоставлял интерфейс более совместимый с CGI.pm, пускай и не в полном объеме, то количество пользователей и и широта использования думаю выросли бы ...

Интерфейс делал похожий на PHP, т.к. на мой взгляд там он более наглядный ...

Спасибо за конструктивную критику!

Это сообщение отредактировал(а) BlackLFL - 30.8.2007, 11:19
PM WWW   Вверх
Vaneska
Дата 8.4.2008, 00:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 141
Регистрация: 15.3.2005
Где: Москва

Репутация: 1
Всего: 4
Нашел хитрый баг!
Если на серваке ограничено количество оперативной памяти для cgi-скрипта, то при загрузке данных от 4 мб. случается хватка памяти.

Приношу свои извинения!
Это у меня в скрипте какая-то утечка..

Это сообщение отредактировал(а) Vaneska - 8.4.2008, 11:52
--------------------
http://isokolov.blogspot.com/
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: CGI программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к CGI программированию
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", качать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: разработка для Web | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0591 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.