Select Code to Download

use Win32::API;

...
    my ($vk,$scan,$flags,$extra_info) = @_;
    $_keybd_event->Call($vk,$scan,$flags,$extra_info);
};