I've never done this with Perl, but it looks like you can use Win32::API. Look at this and it will tell you what you need to access in the API.

Hope this helps
Rich
bash: undo: command not found