Re: Text to Speech Win32::OLE Solution

Every version of windows seems to do this different. Microsoft broke TTS when XP came out. Broken as far as I'm concerened because my code that worked on win2k doesn't on XP. I've given up on asking why. Try this speak.pl , it works on my XP machine. I pipe things into it via STDIN.

#!/usr/bin/perl
use strict;
use warnings;
use Win32::OLE;
my $v=Win32::OLE->new('SAPI.SpVoice');

while (<>) {
    # space out numbers so they'll
    # be spoken individually
    my $single = s/(\d)/$1 /g;
    $v->Speak($_);
}
[download]

haha, and ++ for "Would you like to play a game", the "Hello, World" of text to speech :-)

Comment on Re: Text to Speech Win32::OLE Solution Download Code

Replies are listed 'Best First'.
Re^2: Text to Speech Win32::OLE Solution by TROGDOR (Scribe) on Nov 02, 2004 at 00:43 UTC
Thanks elwarren, that worked. Can you recommend a reference for the OLE interface? How did you find out about this change? Leave it to MS to hose backward compatibility. I'm never quite sure if this kind of stuff happens due to incompetence, or intentional marketing strategy. Anyhow, it worked. And I've learned that "Invalid class string" means OLE didn't recognize the request. Thanks Wise Ones! TROGDOR	[reply]
Re^3: Text to Speech Win32::OLE Solution by jimrobertsiii (Scribe) on Nov 02, 2004 at 05:34 UTC
Do not ascribe to malice that which is easily explained by incompetence --Napolean ;-) -Jim	[reply]
Re^2: Text to Speech Win32::OLE Solution by Jouke (Curate) on Nov 02, 2004 at 10:54 UTC
See my reply to the previous thread. The 'why' is that XP has SAPI5 (which you are using in your example), and you probably used VoiceText on your Win2K machine (which is SAPI4). These two are incompatible Jouke Visser Using Perl to enable the disabled: pVoice	[reply]