The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

App::wrapspeak - It speaks for you !

VERSION

Version 0.1

SYNOPSIS

This App intends to be a simple wrapper around speech synthesis engines. Currently, only festival is supported.

By wrapping, it provides pause, rewind and forward functionalities.

USAGE

wrapspeak.pl text_file_name

  • Space for pause

  • Any Key resumes while paused.

  • Left for rewind by 1 sentence.

  • Right for forward by 1 sentence.

SUBS

run

This is the main subroutine that gets called by the script.

It does the following.

  • Grab all senetences in text.

  • Open3 a pipe to festival.

  • Wait, for user to press a key / or for the sentence read by festival to end.

  • If use has pressed the Space kye, it waits. If the user Left, Right it changes the sentence order.

  • If the sentence has ended , it goes for the next sentence in the LOOP

TODO

  • Extend to espeak

AUTHOR

mucker, <mukcer at gmx.com>

BUGS

Please report any bugs or feature requests to bug-app-wrapspeak at rt.cpan.org, or through the web interface at "/rt.cpan.org/NoAuth/ReportBug.html?Queue=Ap p-wrapspeak" in http:. I will be notified, and then you'll automatically be notified of pro gress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc App::wrapspeak

You can also look for information at:

LICENSE AND COPYRIGHT

Copyright 2012 mucker.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.