Miscellany
public text v1 · immutableuse Asterisk::AGI;
use File::Copy;
$file = 'steph.call';
$path = '/var/lib/asterisk/agi-bin/';
open($file, '>',$path) or die($!);
print $file "This is the content";
close ($file);
use Asterisk::AGI;
use File::Copy;
$file = 'steph.call';
$path = '/var/lib/asterisk/agi-bin/';
open($file, '>',$path) or die($!);
print $file "This is the content";
close ($file);