Come definire le subroutine "statiche" in Perl?

Question

Sono abituato a lavorare in Java, quindi forse questa domanda è una domanda Perl Java-oriented ... in ogni caso, ho creato un pacchetto di Person utilizzando Moose.

Ora, vorrei aggiungere alcune subroutine che sono "statiche", cioè non si riferiscono a uno specifico Person, ma sono ancora strettamente correlate al pacchetto Person. Ad esempio, sub sort_persons ottiene una matrice di oggetti Person.

In Java, vorrei semplicemente dichiarare tali funzioni come static. Ma in Perl ... qual è il modo comune per farlo?

p.s. Penso la terminologia la Perl per quello che sto facendo riferimento alla è "metodi di classe".

Answer 1

Non c'è cosa come un metodo statico in Perl. I metodi che si applicano a tutta la classe sono convenzionalmente chiamati metodi di classe. Questi sono distinti da metodi di istanza per il tipo del primo argomento (che è un nome di pacchetto, non un oggetto). I metodi di costruzione, come new() nella maggior parte delle classi Perl, sono un esempio comune di metodi di classe.

Se si desidera un particolare metodo da richiamare come metodo di classe solo, fare qualcosa di simile:

sub class_method { 
    my ($class, @args) = @_; 
    die "class method invoked on object" if ref $class; 
    # your code   
}