Help for this page
Win32::API->Import("winmm", "mciSendCommand", "NNNN", "N") or die $^E; my $result = mciSendCommand($qux, $quux, $quuux, $quuuux);