Select Code to Download

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

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

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