use constant BASE => 'XX::XDC';
my $change = BASE . '::raja';
eval "require $change";
die($@) if ($@);
$change->new();