bad option "DropSite": must be cget or configure at D:\dss\perl\tk\tkx\dnd.pl line 18.

##</code><code>##

$frame->DropSite(-dropcommand => [\&AcceptDrop, $frame],
                 -droptypes => ('Win32'));