Anonymous user
Speech synthesis: Difference between revisions
no edit summary
m (→{{header|REXX}}: clarified the usage of the SPEAK command, change some comments in the REXX section header, updated a glyph in the REXX program. -- ~~~~) |
No edit summary |
||
Line 135:
<lang Mathematica>Speak["This is an example of speech synthesis."]</lang>
=={{header|Perl}}==
<lang perl>use Speech::Synthesis;
($engine) = Speech::Synthesis->InstalledEngines();
($voice) = Speech::Synthesis->InstalledVoices(engine => $engine);
Speech::Synthesis
->new(engine => $engine, voice => $voice->{id})
->speak("This is an example of speech synthesis.");</lang>
=={{header|PicoLisp}}==
| |||