CPAN search. Learn it, live it, love it.

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;
}
[download]

Enjoy

Trinary