Thanks!

I added $clipboard->Empty();
after my $clipboard = Win32::Clipboard();
and added next if ($text eq '');
before $clipboard->Set($text);, and that seems to have done the trick.

-gryphon
code('Perl') || die;