I wrote a file manager in perl once. What I did was place 'clickable icons' on a canvas (which was really a subclassed label). When you right clicked on these 'icons' you could select 'copy to', 'move to', 'delete' etc. I never implemented drag and drop.

I did plan to though. I was going to use tk's tell function to do it. Essentially, I was going to TK's drag and drop along with tell pass enough information to move/copy/delete files. The problem I found was that in order to make it work right, and feel right to the user, I would have to construct a lot of the features/feels myself. In the end, it would have seemed like a MUNGed up hack.

You can check out the 'clickable icon' i mentioned from the source here: Perlbox - Desktop

Good luck. Keep us posted on how you do.