perl-Class-Method-Modifiers

Модифікатори методів — зручна можливість зі світу CLOS (Common Lisp Object System). У найпростішому вигляді модифікатор методу — це просто метод, який викликає '$self->SUPER::foo(@_)'. Особисто мені важко запам'ятати саме цей виклик, тому мої класи рідко переспрямовують до своїх базових класів. Дуже погано! 'Class::Method::Modifiers' надає три модифікатори: 'before', 'around' та 'after'. 'before' і 'after' виконуються безпосередньо до і після методу, який вони змінюють, але насправді не можуть вплинути на цей оригінальний метод. 'around' виконується замість оригінального методу, з хуком для легкого виклику цього оригінального методу. Див. розділ MODIFIERS для докладнішої інформації про роботу окремих модифікаторів. Явна перевага використання 'Class::Method::Modifiers' полягає в тому, що ви можете визначити кілька модифікаторів в одному просторі імен. Ці окремі модифікатори не потребують знання одне про одного. Це полегшує проєктування zверху вниз. Майте базовий клас, який надає скелетні методи кожної операції, і нехай плагіни змінюють ці методи, щоб заповнити деталі. Батьківські класи не мусять знати про 'Class::Method::Modifiers'. Це означає, що ви повинні мати змогу змінювати методи в _будь-якому_ підкласі. Див. Term::VT102::ZeroBased для прикладу створення підкласів із 'Class::Method::Modifiers'. Коротко: 'Class::Method::Modifiers' розв'язує проблему забезпечення виклику '$self->SUPER::foo(@_)' і надає для цього чистіший інтерфейс. Починаючи з версії 1.00, 'Class::Method::Modifiers' у деяких випадках швидший за Moose. Див. _benchmark/method_modifiers.pl_ у дистрибутиві Moose. 'Class::Method::Modifiers' також надає додатковий тип «модифікатора», 'fresh'; див. нижче.