Select Code to Download

BEGIN {
  my $ns = __PACKAGE__;
...
  eval "require $ns\::Config";
  "$ns\::Config"->import(qw(x y z));
}

BEGIN {
  ( my $ns = __PACKAGE__ ) =~ s/::[^:]*$//;
  my @syms = qw(x y z);
  eval "use $ns\::Config \@syms";
}

BEGIN {
  ( my $ns = __PACKAGE__ ) =~ s/::[^:]*$//;
  my @syms = qw(x y z);
  eval "use $ns\::Config \@syms; 1" or die $@;
}

sub qualify_ns {
   ( my $ns = __PACKAGE__ ) =~ s/::[^:]*$//;
...
}

use if 1, qualify_ns('Config') => qw(x y z);