Select Code to Download

use Module;
BEGIN {
  $Module::variable = 1;
};

use Module;
BEGIN {
  my $m = new Module;
  $m->setConfigVariable();
};

use Module qw(-SetConfigVariable);

my $MyConfigVar=0;
sub import {
...
  $Trace->exit();
}