LanX wrote:

So exporting the whole typeglob will fix it.:).

In case exporter doesn't support * , use your own import

This perfectly does the job!

I replaced

our @EXPORT = qw( %debug $d_area dsay );
[download]

by

our @EXPORT = qw( %debug *d_area dsay );
[download]

in Dsay.pm.

I now can use

sub one {
    local $d_area = "one";
    dsay "debugging output from one";
}

sub two {
    local $d_area = "two";
    dsay "debugging output from two";
}

$debug{TWO} = 1;
one;
two;
[download]

and get debugging output from the 'two' area only. Debugging output stops as soon as the localized $d_area value drops out of scope.
And this without the need of qualifying $Dsay::d_area anymore!

Thank you so much! This really helps, and I have learned a lot!