[OpenSIPS-Users] using perl script on open sips1.7

[Robert R]

Hi,

I just installed opensips1.7.  When loading a simple perl script, the proxy
does not pass the INVITE message. The open sips works fine when not loading
the perl script.

Here is the simple perl:

use OpenSIPS qw ( log );
use OpenSIPS::Constants;

sub test
{
   $m = shift;
   log(L_INFO, "testn");
   return 0;
}


And here is part of the config file to call the perl:

....
loadmodule "perl.so"
modparam("perl", "modpath", "/usr/lib/opensips/perl/")
modparam("perl", "filename", "/etc/opensips/function.pl")
....

   if (is_method("INVITE"))
   {
      setflag(1); # do accounting
      if ( perl_exec("test") )
      {
         xlog("perl passed\n");
      }
   }


I appreciate your help.

Thanks,
R,
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.opensips.org/pipermail/users/attachments/20120726/c462ab16/attachment.htm>