Я пишу классы Perl для удаления избыточности из сценариев, и поскольку у Perl есть много способов сделать классы, у меня все время возникают проблемы с созданием классов. Так есть ли у кого-нибудь лучший пример класса?
Самый большой вопрос: если в модуле не должно быть глобальных переменных, как вы используете переменные через sub() в модуле? Подобно Java self- > foo = 10;
В принципе просто дайте мне класс, написанный на Java или С# или даже С++, и напишите на Perl. Также добавляются дополнительные баллы, показывающие, как правильно выполнять частные, защищенные и общедоступные переменные класса. Наследие и интерфейсы были бы полезны, я думаю.