Select Code to Download

 my $pack='raja.pm';
unshift(@INC,"XX/XDC");
require "$pack";
$obj = $pack->new();
print $obj;