Export, Export und nochmals Export

[Christian Kruse]

你好 Renate,

package Modul;
   require Exporter;

our @ISA = ('Exporter');
   our @EXPORT = (Liste_der_Standard_Exporte);
   our @EXPORT_OK = (Liste_der_Exporte_auf_Anfrage);

  
Diese Variante solltest du verwenden, außer, dass ich den qw-Operator nutzen würde:  
  
~~~perl
  
package Modul;  
require Exporter;  
  
our @ISA = qw(Exporter);  
our @EXPORT = qw(Liste_der_Standard_Exporte);  
our @EXPORT_OK = qw(Liste_der_Exporte_auf_Anfrage);  

Alternativ kannst du, um @ISA, @EXPORT und @EXPORT_OK Paket-Global zu machen, auch use vars benutzen, was rückwärts-kompatibel wäre (our ist erst recht spät eingeführt worden):

  
package Modul;  
require Exporter;  
  
use vars qw(@ISA @EXPORT @EXPORT_OK);  
  
@ISA = qw(Exporter);  
@EXPORT = qw(Liste_der_Standard_Exporte);  
@EXPORT_OK = qw(Liste_der_Exporte_auf_Anfrage);  

Beide Varianten sind richtig. SELFHTMLs Version ist nicht so prickelnd, fliegt einem bei use strict um die Ohren, da die Variablen nicht deklariert wurden.

再见,
 克里斯蒂安