Tkx::lappend('::auto_path', 'd:\active\tkx_extra\tkdnd2.6');
Tkx::package_require('tkdnd');

##</code><code>##

Tkx::lappend('::auto_path', $ENV{PAR_TEMP});
Tkx::package_require('tkdnd');

##</code><code>##

my $where_tkdnd_is=cwd; # or some other way to determine where we are running from 
Tkx::lappend('::auto_path', $where_tkdnd_is);
Tkx::package_require('tkdnd');