[asterisk-dev] Issue with Perl-AGI

[CDR]

I reported this issue a few minutes ago, and uploaded a trace
https://issues.asterisk.org/jira/browse/ASTERISK-20076
But since I also have another issue open since February, I guess I
need to ask for a work around from the community. I need to do what
AGI->stream_file is supposed to do, except that it reports strange
numbers. Specifically, I play a file and use "34" as the argument. If
the user presses 1, 2, 9,etc., the file keeps playing. Once the user
presses "3" or "4", the variable should show me that, either a 3 or a
4. Instead, a get "51".
The question is, is there way to do this away from AGI?
Here is the trace, for the curious:
<SIP/67.203.15.117-0000000e>AGI Rx << STREAM FILE
x-c47f2ba2bb71470ae4eb94377774cb3d814e7bbf 34
[Jun 29 10:24:53] DEBUG[27447]: channel.c:5171 set_format: Set channel
SIP/67.203.15.117-0000000e to write format slin
[Jun 29 10:24:53] DEBUG[27447]: res_rtp_asterisk.c:1357 ast_rtp_write:
Ooh, format changed from unknown to ulaw
[Jun 29 10:24:53] DEBUG[27447]: res_rtp_asterisk.c:1388 ast_rtp_write:
Created smoother: format: ulaw ms: 20 len: 160
[Jun 29 10:24:57] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '1'
[[Jun 29 10:24:58] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '1'
[Jun 29 10:25:00] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '2'
[Jun 29 10:25:02] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '2'
[Jun 29 10:25:03] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '2'
[Jun 29 10:25:04] DEBUG[27447]: chan_sip.c:7459 sip_rtp_read: *
Detected inband DTMF '3'
[Jun 29 10:25:04] DEBUG[27447]: channel.c:5171 set_format: Set channel
SIP/67.203.15.117-0000000e to write format ulaw
<SIP/67.203.15.117-0000000e>AGI Tx >> 200 result=51 endpos=88320
<SIP/67.203.15.117-0000000e>AGI Rx << VERBOSE "User Pressed 51"
async.pl: User Pressed 51