Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Tk Windows Speech Recognition

by IB2017 (Pilgrim)
on Nov 29, 2019 at 19:21 UTC ( [id://11109445]=perlquestion: print w/replies, xml ) Need Help??

IB2017 has asked for the wisdom of the Perl Monks concerning the following question:

Hello Monks

I am playing with the speech recognition engine which is build in any Windows 10 computer. Has anyone experience in using it with Tk? I am experiencing the following problem: in a simple Tk Text widget, 1) it transcribes the first sentence, after this nothing else happen if I keep speaking 2) the sentence is transcribed after I make a pause. On almost any other application I have tried (for example Firefox), the transcription is in real-time (with a very low latency) and there is no interruption after a segment has been transcribed. Any idea? Is Tk the wrong GUI kit for using speech recognition?

use strict; use warnings; use Tk; use Tk::Text; my $mw = tkinit(); my $text = $mw->Text()->pack(); $text->insert('end',"Rot\n"); $text->tagAdd('red_text',"1.13","1.18"); $text->insert('end',"blue\n"); $text->tagAdd('blue_text','end -1 lines','end -1 lines'); $text->tagConfigure('red_text', -foreground => 'red'); $text->tagConfigure('blue_text', -foreground => 'blue'); $mw->MainLoop();

Replies are listed 'Best First'.
Re: Tk Windows Speech Recognition (Dictation)
by Anonymous Monk on Nov 30, 2019 at 01:39 UTC

    Hi ,

    What happens if you run perl -S gedi?

    ? What happens if you add  $text->after( 500, sub{ $Tk::widget->update } );

    ? What happens if you add use Tcl::pTk;

    Got any other gui toolkits installed ( Win32::GUI, Prima, Wx ) ?

      Here is my result

      perl -S gedi Same situation as with my simple code

      $text->after( 500, sub{ $Tk::widget->update } ); No changes

      use Tcl::pTk; (which requires a proper Tcl/Tk installation), same behavior as Tk (same on macOS)

      Win32::GUI: works fine, real-time transcription

      Wx: works fine, real-time transcription

      So, it apparently seems that Tk (Perl or Tcl) is not supporting anything with Speech Recognition. What a shame.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://11109445]
Front-paged by haukex
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (3)
As of 2024-04-25 21:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found