perl-Class-Method-Modifiers

I modificatori di metodo sono una funzionalità conveniente dal mondo CLOS (Common Lisp Object System). Nella sua forma più basilare, un modificatore di metodo è semplicemente un metodo che chiama '$self->SUPER::foo(@_)'. Personalmente ho difficoltà a ricordare quella invocazione esatta, quindi le mie classi raramente ridistribuiscono alle loro classi base. Molto male! 'Class::Method::Modifiers' fornisce tre modificatori: 'before', 'around' e 'after'. 'before' e 'after' vengono eseguiti appena prima e dopo il metodo che modificano, ma non possono davvero influenzare quel metodo originale. 'around' viene eseguito al posto del metodo originale, con un hook per chiamare facilmente quel metodo originale. Vedere la sezione MODIFIERS per maggiori dettagli su come funzionano i singoli modificatori. Un chiaro vantaggio nell'usare 'Class::Method::Modifiers' è che potete definire più modificatori in un unico namespace. Questi modificatori separati non hanno bisogno di conoscersi a vicenda. Ciò rende facile la progettazione top-down. Abbiate una classe base che fornisce i metodi scheletro di ogni operazione, e fate in modo che i plugin modifichino quei metodi per completare i dettagli. Le classi genitore non devono conoscere 'Class::Method::Modifiers'. Ciò significa che dovreste poter modificare metodi in _qualsiasi_ sottoclasse. Vedere Term::VT102::ZeroBased per un esempio di sottoclasse con 'Class::Method::Modifiers'. In breve, 'Class::Method::Modifiers' risolve il problema di assicurarsi di chiamare '$self->SUPER::foo(@_)', e fornisce un'interfaccia più pulita per farlo. A partire dalla versione 1.00, 'Class::Method::Modifiers' è più veloce in alcuni casi di Moose. Vedere _benchmark/method_modifiers.pl_ nella distribuzione Moose. 'Class::Method::Modifiers' fornisce anche un tipo di "modificatore" aggiuntivo, 'fresh'; vedere sotto.