----- Original Message -----
From: "Octavian Rasnita" <[EMAIL PROTECTED]>
To: <Perl-Win32-Users@listserv.ActiveState.com>
Sent: Monday, July 25, 2005 11:11 PM
Subject: voice
> Hi,
>
> I have tried the following script under Windows 2000 (probably SAPI 4),
but
> it doesn't speak anything.
>
> Can you give me the right code?
>
> Thank you much.
>
> Teddy
>
>
> use strict;
>
> use Win32::OLE;
> my $voice = Win32::OLE->new("Speech.VoiceText");
> $voice->Register('', 'Perl');
> $voice->speak("hello world");
> <STDIN>; # wait til it finishes speaking
>
speak() needs a second argument. Make it:
$voice->speak("hello world", 0);
With that change in place, it works ok for me on Windows 2000.
Cheers,
Rob
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
