Displaying 1 result from an estimated 1 matches for "t2wp".
Did you mean:
t2p
2005 Feb 18
1
Asterisk@home festival weather report
...ipt.pl|\"Thank you and please call again!\"");
unlink("/tmp/$filesname.$$");
exit;
Step 2 - Copy the text below into Notepad and name it festival-weather-script.pl
#!/usr/bin/perl
#make a tts dir inside your sounds dir (as specified below)
#adjust the t2wp variable to point to your festival bin directory
use Asterisk::AGI;
use File::Basename;
use Digest::MD5 qw(md5_hex);
$AGI = new Asterisk::AGI;
my %input = $AGI->ReadParse();
my ($text)=@ARGV;
my $hash = md5_hex($text);
my $sounddir = "/var/lib/asterisk/sounds/tts&q...