Re: [asterisk-users] Perl AGI: read variable with quotes

2020-01-27 Thread Benoit Panizzon
Hi Gang Thank you for the replies. I sorted this out. I got tricked by $AGI->verbose(Pai: $pai) which cripples the output. The variable passed on is complete. My regex to extract the phone number from that variable was broken when there was a quoted string before the URI. Mit freundlichen

Re: [asterisk-users] Perl AGI: read variable with quotes

2020-01-24 Thread Steve Edwards
On Fri, 24 Jan 2020, Steve Edwards wrote: 2) How about doing 'GET FULL VARIABLE' in your Perl script? Sorry. After a couple more cups of tea I think this was a bit vague. Try whatever call/method in your library that does 'GET FULL VARIABLE' on '${PJSIP_HEADER(read,P-Asserted-Identity)}' in

Re: [asterisk-users] Perl AGI: read variable with quotes

2020-01-24 Thread Tony Mountifield
In article <20200124154749.46da5...@go.imp.ch>, Benoit Panizzon wrote: > Hi Gang > > I have stumbled of this problem. > > I need the P-Asserted-Identity header in an AGI scrip. > > In the Dial-Plan I do: > > same => n,Set(PAI=${PJSIP_HEADER(read,P-Asserted-Identity)}) > > In the AGI I do: >

Re: [asterisk-users] Perl AGI: read variable with quotes

2020-01-24 Thread Steve Edwards
On Fri, 24 Jan 2020, Benoit Panizzon wrote: I have stumbled of this problem. I need the P-Asserted-Identity header in an AGI scrip. In the Dial-Plan I do: same => n,Set(PAI=${PJSIP_HEADER(read,P-Asserted-Identity)}) In the AGI I do: my $pai = $AGI->get_variable(PAI); This works fine,