mit eval zum vorläufigen ziel

[Beat]

foreach( keys ( %$mod::export  )  ){
Das funktioniert nicht. Ich hatte dir doch gezeigt wie es geht.

Habs eingesehen.
Habe deinen Vorschlag übernommen.

Allerdings.
Verwende ich no strict refs compiliert PC::Parser nicht
Verwende ich kein no strict refs

dann habe ich jetzt:
Can't use string ("html::export") as a HASH ref while "strict refs" in use at C:.../PC/Parser.pm line 423, <> line 1.

für

  
foreach( keys ( %{$mod . '::export' }  )  )  

Jetzt habe ich das gemacht:

  
my %hash = eval{ '%' .$mod . '::export'};  
foreach( keys ( %hash  )  ){...}  

Die Folge ist die Kopie des Hashes, was mir auch recht ist.
Mache mal weiter und arbeite die Tests durch.

mfg Beat;