Où stocker les méthodes UNIVERSAL en Perl

Question

Je comprends donc que la classe spéciale UNIVERSAL doit être considérée comme la classe de base à partir de laquelle tous les autres objets sont créés. Donc, si une méthode spécifique n'est pas trouvée après que Perl a traversé la hiérarchie d'héritage, il regardera dans la classe UNIVERSAL pour voir si la méthode peut être trouvée là. Toutefois, lorsque vous créez une distribution, aucun package UNIVERSAL.pm n'est créé. En outre, les méthodes de DOES 'et « peut » UNIVERSAL déjà exister sans UNIVERSAL.pm ... En tant que tel, je ne sais pas si je devrais écrire des méthodes UNIVERSAL dans des emballages aléatoires comme ceci:

sub UNIVERSAL::nicemethod{ 
    launch_teh_missles(); 
} 

Ou devrais-je créer un paquet UNIVERSAL séparé et un fichier .pm? Qu'est-ce qui est considéré comme la meilleure pratique?

Answer 1

Vous pouvez ajouter de nouvelles méthodes pour UNIVERSAL la même manière que tout autre emballage:

package 
    UNIVERSAL; # Line break to fool CPAN indexer 

sub nice_method { 
    ... 
}