Help for this page
... my $f = Win32::API->new("winmm", "long mciSendString(LPSTR a, LPSTR b, + long c, long d)"); ... delete $f->{proto}; delete $f->{intypes}; ...
Win32::API->new("winmm", "PPNN", "N");