Revision: 2233
http://astpp.svn.sourceforge.net/astpp/?rev=2233&view=rev
Author: darrenkw
Date: 2009-02-21 18:12:03 +0000 (Sat, 21 Feb 2009)
Log Message:
-----------
cleaned up a few minor coding problems.
Modified Paths:
--------------
trunk/freeswitch/test-fs-xml.pl
Modified: trunk/freeswitch/test-fs-xml.pl
===================================================================
--- trunk/freeswitch/test-fs-xml.pl 2009-02-03 17:15:20 UTC (rev 2232)
+++ trunk/freeswitch/test-fs-xml.pl 2009-02-21 18:12:03 UTC (rev 2233)
@@ -20,7 +20,7 @@
my $starttime = [gettimeofday];
-my $url = 'http://localhost/cgi-bin/astpp-fs-xml.pl?section=dialplan&Caller-Destination-Number=123456789&variable_accountcode=1000';
+#my $url = 'http://localhost/cgi-bin/astpp-fs-xml.pl?section=dialplan&Caller-Destination-Number=123456789&variable_accountcode=1000';
my $url = 'http://localhost/perl/astpp-fs-xml.pl?section=dialplan&Caller-Destination-Number=123456789&variable_accountcode=1000';
#my $req = HTTP::Request->new(POST, $url, $headers);
@@ -38,8 +38,8 @@
print $count;
$count++;
my $content = get $url;
+print $content;
}
-print $content;
my $generation_time = tv_interval($starttime);
print "\n\n" . $generation_time . "\n\n";
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
