Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Code example for perl speech recognition using SAPI 5.1 and Win32::OLE?

by TROGDOR (Scribe)
on Nov 24, 2004 at 03:04 UTC ( #410043=perlquestion: print w/replies, xml ) Need Help??
TROGDOR has asked for the wisdom of the Perl Monks concerning the following question:

Greetings Monks,

For days and nights I have been searching for a simple code example of how to set up a speech recognizer in perl using SAPI 5.1 and Win32::OLE. A variety of Google keyword searches have yet to find anything useful. Here's what I've found so far:

- misterhouse has a nice perl recognizer for MS, but it uses the older SAPI 4.0, which won't work under XP unless I download and install the now-obsolete SAPI 4.0 SDK.

- I've tried to follow along with the SAPI 5.1 tutorials for C++ and transpose them into perl. Here's how far I got:

use Win32::OLE; use Win32::OLE::Const ("Microsoft Speech Object Library"); my $recognizer = Win32::OLE->new('SAPI.SpSharedRecognizer'); my $recoctxt = $recognizer->CreateRecoContext();
It barfs on the CreateRecoContext.
Win32::OLE(0.1403) error 0x80040154: "Class not registered" in METHOD/PROPERTYGET "CreateRecoContext" at speech.pl line 11
Can anyone point me to a perl SAPI 5.1 example? Or offer suggestions or a tutorial page on how to transpose MS C++ API code into something that Win32::OLE can recognize?

Thanks,
TROGDOR

Replies are listed 'Best First'.
Re: Code example for perl speech recognition using SAPI 5.1 and Win32::OLE?
by Jouke (Curate) on Nov 24, 2004 at 12:02 UTC
    Maybe it's a good idea to use Win32::SAPI5


    Jouke Visser
    Using Perl to enable the disabled: pVoice
      Win32::SAPI5 only implements the text to speech part of the SAPI5.
        It most certainly does not. It implements all classes that the Microsoft Speech API 5 defines...


        Jouke Visser
        Using Perl to enable the disabled: pVoice

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://410043]
Approved by NetWallah
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (7)
As of 2018-07-16 22:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?















    Results (352 votes). Check out past polls.

    Notices?