perl -MWin32::Sound -le "print($_), Win32::Sound::Play($_) for qw/SystemDefault SystemAsterisk SystemExclamation SystemExit SystemHand SystemQuestion SystemStart/"