perl -MWin32::Sound -e " Win32::Sound::Play( qq[$ENV{WINDIR}/media/chord.wav] , SND_ASYNC ); sleep 3; Win32::Sound::Stop(); "

##</code><code>##

perl -MWin32::Sound -e " Win32::Sound::Play( qq[$ENV{WINDIR}/media/chord.wav] , Win32::Sound::SND_ASYNC() | Win32::Sound::SND_LOOP() ); sleep 3; Win32::Sound::Stop(); "