C:\>perl -E "use Win32::Sound; say Win32::Sound::SND_ASYNC; say Win32::Sound::SND_LOOP; say Win32::Sound::SND_NODEFAULT;"
1
8
2