perl -MWin32::SAPI5 -MClass::Inspector -MData::Dumper -e "print Dumper \Class::Inspector->methods('Win32::SAPI5::SpVoice','expanded')"
[..]
# or
perl -MWin32::SAPI5 -e "for (sort keys %Win32::SAPI5::SpVoice::){print qq($_\n) if exists &{qq(Win32::SAPI5::SpVoice::$_)}}"
# working
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); print for $voice->GetInstalledLanguages"
Italian (Italy)English (United States of America)
# NOT working
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); print for $voice->GetInstalledVoices"
# working pitch
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ This is a test.})"
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ This is a test.})"
# working absspeed from -10 .. 10 ?
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ this is some input text})"
# working silence and spelling
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ UN})"
# working fortmat date
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ 4/12/1972 })"
#wondering if it works :)
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ If I want I can speed up the rate })"
# not working
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ Today is 01/31/2023 })"
# working but not with text in front of tags
perl -MWin32::SAPI5 -e "$voice=Win32::SAPI5::SpVoice->new(); $voice->Speak( q{ www.perl.org 12:30 })"