Displaying 2 results from an estimated 2 matches for "finishfile".
2003 Aug 25
6
Syncronize Monitored Calls
.../local/bin/mix_monitor_files.pl ${MONITORDIR}
${CALLFILENAME}-in.wav ${CALLFILENAME}-out.wav ${CALLFILENAME}.wav)
exten => s,6,NoOp
Here is mix_monitor_files.pl. sox and wmix must be in the path of your
perl script
#!/usr/bin/perl
$monitordir = shift;
$infile = shift;
$outfile = shift;
$finishfile = shift;
chdir($monitordir);
$infile_output = `sox $infile -e stat 2>&1`;
$outfile_output = `sox $outfile -e stat 2>&1`;
$infile_output =~ /Samples read:\s+(\d+)/;
$infile_samples = $1;
$outfile_output =~ /Samples read:\s+(\d+)/;
$outfile_samples = $1;
if($outfile_sample...
2004 Jan 20
1
help - recording both sides of a conversati on
...he /var/spool/asterisk/monitor directory!
> >
> > Finally, mix_monitor_files.pl does the mixing job and combines the in
and
> > out files:
> >
> > #!/usr/bin/perl
> >
> > $monitordir = shift;
> > $infile = shift;
> > $outfile = shift;
> > $finishfile = shift;
> >
> > chdir($monitordir);
> >
> >
> > $infile_output = `sox $infile -e stat 2>&1`;
> > $outfile_output = `sox $outfile -e stat 2>&1`;
> >
> > $infile_output =~ /Samples read:\s+(\d+)/;
> > $infile_samples = $1;
> >...