[OpenSER-Users] bflag in perl module

Mik Cheez michael_bulk at wildgate.com
Wed Jun 25 17:45:36 CEST 2008


Just for the record, I just realized I mangled the variable name in my 
example:

It should be
             my $bflag;

             $bflag = $m->pseudoVar("\$bf");

$srcip was a variable from my own script :">

Julien mangeard wrote:
> It's working, thank you.
> 
> On Tue, Jun 24, 2008 at 5:55 AM, Mik Cheez <michael_bulk at wildgate.com 
> <mailto:michael_bulk at wildgate.com>> wrote:
> 
>     Julien mangeard wrote:
> 
>         Hi,
> 
>         Can I get the bflag value in a script loaded with the perl module ?
>         It seams to me that the 'isbflagset' function isn't implemented.
> 
>         Do you know another manner to obtain this value ?
> 
>         Best Regards,
> 
> 
>         -- 
>         Julien Mangeard
> 
> 
> 
>     Julien,
> 
>     It's in a pseudo variable as of 1.2.  You should be able to do
>     something straightforward like this in your Perl script:
> 
>     sub function_name {
>            my $m = shift; # headers
>            my $bflag;
> 
>            $srcip = $m->pseudoVar("\$bf");
>            ...
>            ...
>     }
> 
>     $bf is the decimal value stored
> 
>     Here's the documentation relating to the pseudo variables:
>     http://openser.org/dokuwiki/doku.php/utils:flags
> 
> 
> 
> 
> -- 
> Julien Mangeard




More information about the sr-users mailing list