Hi,
Octavian Rasnita wrote:
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
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Take a look at
http://opensource.activestate.com/authors/jandubois/Perl/TPC3/fun.html#Can_I_access_COM_OLE_objects_f
and
http://www.archivum.info/[email protected]/2005-06/msg00126.html
regards,
Reinhard
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
