...
my $f = Win32::API->new("winmm", "long mciSendString(LPSTR a, LPSTR b, long c, long d)");

delete $f->{proto};
delete $f->{intypes};
...