How can I remap the keyboard with Perl on Win32?

I want to remap the keyboard with Perl on Win32 system. Is there any option to do that? If yes, could you pro开发者_开发技巧vide an example?

Remapping the keyboard means form example when the user presses a, he gets b or something else according to the remapping).

---

This code claims to address this issue.