Собственно, вопрос о производительности / логичности разбиения большой программы на кучу модулей. Кроме логичности кода/удобства есть плюсы? Потери в скорости интерпретации будут (пока он там все файлы соберет подключит)?

Конечно будут. Только для человека, зачастую, важнее удобство работы с программой чем её производтельность. Если юзать ООП, то будет работать ещё медленей.

То есть получается чем больше вызовов функций, подключения модулей, и других напрямую не связанных с алгоритмом программы действий, тем медленнее программа и более читаемый код.
Получается, если производительность действительно критична, надо делать без ООП и с минимумом функций и модулей - чистый алгоритм. Но с читаемостью этого добра действительно проблемы будут.
Судя по твоему сучаю (большая прога) наверно лучше будет всетаки разбить на модули, систематизировать код. Потом гораздо проще в нем разбираться и изменять/дополнять по прошествии времени.

Лично я, по возможности, стараюсь пользоваться ООП. Почему???
Потому что, когда ты подключаешь класс и создаёшь объект этого класса, ты ничего не грузишь, все методы подгружаются по мере их нужды, т.е. вызовов. Да и код получается более элегантный, плюс не будет конфликта, если у тебя, в текущем пространстве имён текущего пакета, есть функции с такими же именами, как и в подключаемом модуле.

У модуля немного другая стратегия, он как правило всегда экспортирует свои функции в текущий пакет main. Производительность при использовании модуля выше, потому как он делает экспорт на стадии компиляции.
Потому когда подключаешь какой-нить модуль, всегда нужно стараться использовать его на полную катушку, да бы оправдать его самого.

Вот например:
часто встречаю код, где люди подключают, не маленький, модуль CGI.pm, при этом в подключении используют экспорт стандартных функций use CGI qw( :standard ), что ещё хуже вижу такое подключение use CGI qw( :all );, а пользуются только функией param() Что не есть гуд. Ну если тебе нужно юзать только param(), то и экспортируй её use CGI qw( :param );, а не все стандартные функции. В данном случае будет экспотированы не все стандартные функции, а только одна param(), соответственно и скорость повысится.

Это сообщение отредактировал(а) korob2001 - 28.5.2005, 09:00

Спасибо за ответы. В частности, отдельная благодарность тов. korob2001 за его грамотные и содержательные ответы, и вообще за поддержку этого форума, всегда приятно сюда зайти. (давно хотел сказать, да как-то руки не доходили =)). Еще раз - респект.

Это сообщение отредактировал(а) Ramirez - 29.5.2005, 02:05

Цитата

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

Конечно! Real programmers code in binary!

Цитата

1010110 1100001 1101110 1100101 1110011 1101011 1100001

:-))

korob2001
Так, а вот я использую use CGI qw( :param );
но у меня в коде есть вызовы `start_html()`, `end_html()`,`cookie` однако всё прекрасно работает - Perl делает "дозагрузку" этих частей?

Цитата

korob2001 Так, а вот я использую use CGI qw( :param ); но у меня в коде есть вызовы `start_html()`, `end_html()`,`cookie` однако всё прекрасно работает - Perl делает "дозагрузку" этих частей?

Просто ты наверное юзаешь ООП и соответственно ты можешь обращаться к любому методу, через объект, т.е. скорее всего ты пишешь так:

Код

use CGI qw( :param ); my $cgi = new CGI; print $cgi->start_html();

Это не правильно, потому как ты экспортировал функцию param() в текущий пакет и наверняка юзаешь её так:

Код

my $text = $cgi->param('txt');

Получаются накладные расходы. Вот что происходит:
1. Экспортируется функция param() в тещее пространство имён.
2. Ты создаёшь объект.
3. Вызываешь param() через объект.
Вопрос: зачем нужно было экспортировать param(), если ты всё равно пользуешься ООП подходом??? Т.е. шаг 1 абсолюно не нужен.

Вобщем, когда юзаешь ООП не нужно вообще ничего экспортировать в текущее пространство имён, ты же обращаешься к методам через объект. Другими словами достаточно написать:

Код

use CGI; my $cgi = new CGI; # Начиная отсюда, мы и меем доступ ко всем открытым методам модуля CGI.pm, через объект

или так:

Код

use CGI; my $cgi = CGI->new(); # Начиная отсюда, мы и меем доступ ко всем открытым методам модуля CGI.pm, через объект

Попробуй запустить такой код:

Код

#!/usr/bin/perl -w use strict; use CGI qw( :param ); print header( -charset => 'Windows-1251' ); print start_html();    print h1("Ощибка"); print end_html();

И получишь такую ошибку: Undefined subroutine &main::header called at Untitled line 5.

А теперь давай исправим ошибки, т.е. экспортируем все нужные функции:

Код

#!/usr/bin/perl -w use strict; use CGI qw( :header :start_html :h1 :end_html ); print header( -charset => 'Windows-1251' ); print start_html();    print h1("Теперь всё в порядке"); print end_html();

Вот теперь код будет работать на ура. Если хочешь, попробуй удали из списка экспортируемых функций, хотя бы одну из них, например: :end_html
И получишь опять сообщение об ошибке.

Удачи.

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

Ок, спасибо за разъяснения.
Я использовал метод объекта

Код

$q = new CGI; $q->param("lala");