That's the code directly copied from the synopsis of Win32::Clipboard. However, it does far too much and it doesn't do the right thing. Actually that sample makes no sense as a whole. Because $CLIP->Empty() clears the clipboard, you end up with nothing.

Shorter, working code is

use Win32::Clipboard;
$CLIP = Win32::Clipboard();
$CLIP->Set("some text to copy into the clipboard");
[download]

Or, shorter still:

use Win32::Clipboard;
Win32::Clipboard("some different text to copy into the clipboard");
[download]