use Win32::Sound; Win32::Sound::Volume('100%'); if ($correct_answer) { Win32::Sound::Play("yes.wav"); Win32::Sound::Stop; } else { Win32::Sound::Play("no.wav"); Win32::Sound::Stop; }