A right-click bind in Tk is relatively simple to acheive:

$object -> bind('<Button-3>', \&subToCall);

If you're under Windows, then the Win32::Clipboard module should help you when it comes to pasting in text.

More generally, Tk::Clipboard (which is built in, apparently, I haven't used it) can be used to copy and paste data within the application.

Hope this helps ..
--Foxcub