Was ist der Unterschied zwischen `base verwenden 'und @ISA in Perl?

Question

Ich möchte eine Singleton-Klasse machen, die DBI erweitert. sollte ich so etwas wie dies tun:

use base 'Class::Singleton'; 
our @ISA = ('DBI');

oder dies:

our @ISA = ('Class::Singleton', 'DBI');

oder etwas anderes?

Nicht wirklich sicher, was der Unterschied zwischen 'Base verwenden' und 'ISA' ist.

Answer 1

Ich denke, Sie sollten das parent Pragma statt base verwenden, wie in perldoc base vorgeschlagen wurde.

Answer 2

Die typische Verwendung von @ISA ist

package Foo; 

require Bar; 
our @ISA = qw/Bar/; 

Die base und parent pragmas sowohl die angeforderte Klasse laden und @ISA modifizieren enthalten:

package Foo; 

use base qw/Bar/; 

Wenn Sie mehrere Vererbungs möchten, können Sie liefern mehr als ein Modul zu base oder parent:

package Foo; 

use parent qw/Bar Baz/; #@ISA is now ("Bar", "Baz"); 

Das Pragma parent ist neu ab Perl 5.10.1, aber es ist von CPAN installierbar, wenn Sie eine ältere Version von Perl haben. Es wurde geschaffen, weil das Pragma base aufgrund des sich in ihm angesammelten Crust schwer zu pflegen war. Sie sollten keinen Unterschied in der Grundnutzung zwischen den beiden sehen.

Answer 3

von Perldoc Base ...

package Baz; 

use base qw(Foo Bar); 

ist im wesentlichen äquivalent zu

package Baz; 

BEGIN { 
    require Foo; 
    require Bar; 
    push @ISA, qw(Foo Bar); 
} 

persönlich I Basis verwenden.

Answer 4

Wenn Sie die Elternklasse erben möchten, müssen Sie sie laden und @ISA ändern. Diese beiden Schritte werden bei der Verwendung von Base durchgeführt. Base lädt das Modul für Sie und ändert @ISA entsprechend. Andernfalls müssten Sie @ISA ändern und das übergeordnete Modul selbst laden.

die beiden folgenden äquivalent:

use base "Parent"; 

und

require Parent; 
@ISA = ("Parent");