my $CLIP = Win32::Clipboard();
$CLIP->Set($output);
print "Clipboard contains: ", $CLIP->Get(), "\n";
my $paste_range = $worksheet->Range('A1');
$paste_range->PasteSpecial();