Hi Jonathan, On a separate side note, that code is particularly unclean. You may want to consider either building the XML response using an XML library, or use a template parsing language so you are not placing raw XML in your source. In regards to your original email, the link Steven has provided is a good starting point. Hope this helps. Cal On Sun, Jan 27, 2013 at 1:16 PM, johnthan123 <johnthan123@gmail.com> wrote:
HI All,
Can You Please any one help me To Write Directory and Dialplan and In XML_CURL Like Below
#################CODE######################## #!/usr/bin/perl use strict; use warnings; use Data::Dump qw(dump); use CGI; my $q = CGI->new; my $section = $q->param('section');
if ($section eq 'directory'){
$XML_STRING2 = ' <?xml version="1.0" encoding="UTF-8" standalone="no"?> <document type="freeswitch/xml"> <section name="directory"> <domain name="192.168.4.32"> <user id="1001"> <params> <param name="password" value="1001"/> </params> <variables> <variable name="accountcode" value="1001"/> <variable name="user_context" value="default"/> <variable name="effective_caller_id_name" value="1001"/> <variable name="nibble_rate" value="0.05"/> <variable name="nibble_account" value="1"/> <variable name="effective_caller_id_number" value="1001"/> </variables> </user> </domain> </section> '; } elsif ( $section eq 'dialplan' ) { $XML_STRING = ' <section name="dialplan" description="example_curl_dialplan"> <context name="public"> <extension name="curl_test"> <condition field="destination_number" expression="^(80\d{2})$"> <action application="set" data="dialed_extension=$1"/> <action application="set" data="nibble_account=${accountcode}"/> <action application="bridge" data="sofia/gateway/peer_asterisk/$1"/> </condition> </extension> </context> </section> </document> '; }
###########################END#############################
This is Working for Me But i cant able to take the Database values into XML file
Thanks In Advance
Thanks
J :: T
_________________________________________________________________________ Professional FreeSWITCH Consulting Services: consulting@freeswitch.org http://www.freeswitchsolutions.com
FreeSWITCH-powered IP PBX: The CudaTel Communication Server http://www.cudatel.com
Official FreeSWITCH Sites http://www.freeswitch.org http://wiki.freeswitch.org http://www.cluecon.com
FreeSWITCH-users mailing list FreeSWITCH-users@lists.freeswitch.org http://lists.freeswitch.org/mailman/listinfo/freeswitch-users UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users http://www.freeswitch.org