>На самом деле, в Perl можно легко узнать все, что угодно о
>разобранной программе в памяти. Мне просто интересно, докапается до этого ДобрыйДохтур
>самостоятельно в доках? Авось так всю документацию изучит и станет лучше
>понимать с чем спорит. Уважаемый Stanislaus!
Чтобы понять, что в perl плохо, достаточно посмотреть что будет изменено/добавлено в perl6.
http://www.perlfoundation.org/perl6/index.cgi?the_long_perl_...
Да, интроспекция в perl есть, но в зачаточном состоянии.
Узнать, что нам передали в кач-ве аргумента в perl можно, но крайне геморройно.
Отсутствие возможности указать типы аргументов(позвать функцию, вычисляющую факториал с аргументом "vasya") и отсутсвие единообразного способа итерации по последовательностям сильно усложняют написание кода и отладку.
класс + ручное дергание getNext() как тут показывали - весьма забавный костыль.
Отсутствие функций с переменным числом аргументов, именнованных аргументов, аргументов по умолчанию, нормального механизма исключений.
-----
Even if the Perl 5 codebase did follow a specification, its design is inelegant in many places. It's also very difficult to expand. Many good ideas that would make code easier to write and maintain are too impractical to support. It's a good prototype, but it's not code that you would want to keep if you had the option to do something different.
From the language level, there are a few inconsistencies, as well. For example, why should sigils change depending on how you access internal data? (The canonical answer is "To specify context of the access," but there are other ways to mark the same.) When is a block a block, and when is it a hash reference? Why does SUPER method redispatch not respect the currently dispatched class of the invocant, but only the compiled class? How can you tell the indirect object notation's method name barewords from bareword class or function names?
It can be difficult to decide whether the problem with a certain feature is in the design or the implementation. Consider the desire to replace a built-in data structure with a user-defined object. Perl 5 requires you to use tie and overload to do so. To make this work, the internals check special flags on every data structure in every opcode to see if the current item has any magical behavior. This is ugly, slow, inflexible, and difficult to understand.
------
