"Module und Datenexport" oder muss ich `in Ruhestand?

[Philipp Hasenfratz]

Halihallo

Bin irgendwie blablabla, da programmiert man irgendwas grosses und weiss nicht einmal mehr, wie man Variablen exportiert ;-(
Ich seh irgendwie den Wald vor lauter Bäumen nicht mehr. Wäre froh, wenn ihr etwas abholzen helft :

Ich hab'n Modul, das die einen bestimmten Hash iniziiert, der anschliessend (mit Inhalt!) im Hauptprogramm zu gebrauchen sein soll.

und so sieht's aus:

package mymod;

use strict;
no strict "refs";
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $VERSION);
use Exporter;
$VERSION = 2.06;
@ISA = qw(Exporter);

@EXPORT = ('%HASH');   # so exportier den Scheisshash doch endlich!!!

sub _GetHash
{
   [...]
   return %tmpHASH;
}

my %HASH = &_GetHash;

1;

im Hauptprogramm:

use strict;
use mymod;
use Data::Dumper;

print Dump(%HASH);

hier sollte er jetzt den im Modul mymod iniziierten Hash %HASH ausgeben, tut er aber nicht und strict gibt noch nicht einmal einen Fehler aus, also: Wo zum Henker mache ich was falsch?

Danke für's zuhören (und eine eventuelle Antwort)

Philipp