1
0
mirror of https://github.com/signalwire/freeswitch.git synced 2025-02-21 09:02:37 +00:00

7 lines
229 B
Perl
Raw Normal View History

# Example Perl script to originate. perlrun
freeswitch::console_log("info", "Perl in da house!!!\n");
$session = new freeswitch::Session("sofia/10.0.1.100/1002") ;
$session->execute("playback", "/sr8k.wav");
$session->hangup();