Ковырял тут фильтр POE::Filter::JSON т.к. работать он у меня отказался. Ругается на такую строку:


а конкретно на строку 4, а имненно на конструкцию @{$self->[BUFFER]}



что это за конструкция такая?! единственное похожее нашел в "рецептах..." под названием  "Применение замыканий вместо обьектов"


причем обьявляется эта хрень в начале пакета (класса) вообще странно:



конструктор тоже для меня странно выглядит:

в качестве объекта bless передается, я так понимаю, анонимный массив, который приводится к классу $type
а как это вязано с 


Кто может обьяснить как это работает?

Это сообщение отредактировал(а) Ramirez - 2.4.2007, 23:14

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

Это константы, точнее их подобие. Аналогично можно, а главное нужно, было бы написать так:

Тогда бы ни у тебя, ни у кого-то другого не возникло бы вопроса: Что это за хрень?

Теперь перейдём к конструктору:

Перепишем его в более понятную форму:

Теперь обрати внимание на коментарии, которые я прописал напротив каждого элемента, особенно на их индекс, а так же обрати внимание на значение констант:

Думаю ты уже понял, что делает интересующая тебя конструкция.

Т.е. мы обращаемся ко второму элементу анонимного массива (index 1 или константа BUFFER), который мы создали в конструкторе и там же посвятили его в объекты.

Теперь можно перейти к самому главному:
Почему же ты получаешь ошибку?

Всё станет понятно, если посмотреть на код:

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

Собственно здесь и спотыкается программа. Затем код пытается впихнуть, в якобы разименованный массив все элементы, которые были переданы методу get_one_start(), это следующее место где Perl споткнулcя бы, если бы он каким-то образом пропустил разыменование строки, как ссылки на массив.

Исправить этот глюк, можно заменив, строку в теле конструктора:

На такую:

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

ЗЫ: А вообще, всё что мы здесь проанализировали, написано глючно. И использовать такой класс лучше после полного просмотра и редактирования исходного кода. Разумеется, если отдаёшь себе отчёт в том, что делаешь. Либо попытаться найти что-то аналогичное, но написанное более профессионально.

ЗЗЫ: Я не смотрел исходники этого класса, анализировал только по тому коду, который привёл ты в своём посте.

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

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

А теперь подробно:

1. В POE как правило объекты реализованы не как приведенный хеш, а как приведенный массив, то есть ссылка на объект это ссылка на массив.
2. В связи с пунктом первым, у полей нет имен, но обращаться к ним всеже удобней не по числовому индексу, а по имени, для того и создаються такие пустышки, функции с порядковыми номерами... как правило в верхнем регистре.
3. Тот же метод имен вместо индексов используеться при передаче параметров:

По поводу того что это надо было делать через use const, то ничего не скажу, я не знаю чем руководствовались при выборе такого способа, возможно из-за производительности, возможно из-за памяти, не знаю... 
Но меня такая политика устраивает, и считаю что самое главное, это не каким именно способом реализовано (всеже многовариантность, это фишка Perl), а то что этот способ един и единообразен для всей системы... То есть если человек освоиться с POE, то изучение дополнительных компонентов, не повлечет за собой и изучение нового интерфейса доступа и т.д. Многовариантность, многовариантностью но PerlStyle тоже существует 

Ну если бы из-за производительности или памяти, тогда можно было бы использовать идексы вместо констант, в конструкторе можно было бы избавиться от переменной $self, так как bless возвращает посвящённую ссылку.
use constant создаёт ту же функцию без параметров, так что не думаю что последние будут быстрее первых или ресурсов израсходуют меньше. Просто выглядит use constant более понятно.

Действительно, совсем не пришло в голову... тогда все складывается =)


 я уж потом тоже методом тыка нашел =)


korob2001, Nab, СПАСИБО! 


  Модуль похоже действительно придется переписать... много корявых мест...

Это сообщение отредактировал(а) Ramirez - 3.4.2007, 15:04