#
# WindowsClipboard.pl
#
# Get current cursor position and store it on the Windows Clipboard
# sfzgeek
#
 
use strict;
use warnings;
 
use Win32::Clipboard;
 
my $Clipboard = Win32::Clipboard();
 
# Get current cursor position
my $Cursor_Position = RPR_GetCursorPosition();
 
# Store cursor position in Windows clipboard
$Clipboard -> Set($Cursor_Position);