Modul og array

det nemmeste er at lave en reference og returnere den fra modulet.

ala:

sub lavAry {
  my @ary=(1,2,3);
  ...

  return \@ary;
}

strengt taget behøver det ikke at være en reference

Således gjorde jeg det. Men smid et svar mfalck så får du points.

.pm scriptet.
-----------------
@EXPORT = qw(
@DomainNavn );

@DomainNavn = ('DC=xxx, DC=yy');
-----------------
i pl scriptet.
-----------------
use Par qw(@DomainNavn)

print $DomainNavn[0];

ok