Hi.<br>I&#39;m trying to get digits form the user via agi<br>something like this: this only should print result=asciicode<br><br>but none of the functions even wait until timeout .. <br>they just pass .. (after a nanosecond)

<br><br>the las print is always timeout.<br><br>Any clue ..?<br><br><br>my $callerid = $AGI{&#39;callerid&#39;} ;<br>if($callerid !~ /[0-9]{7,20}/){<br>&nbsp;&nbsp; #way numbre one<br>&nbsp;&nbsp; print &quot;EXEC PLAYBACK&nbsp; please_enter_your_number \&quot;\&quot;\n&quot;;&nbsp; my $result = &lt;STDIN&gt;;

<br>&nbsp;&nbsp; print &quot;WAIT FOR DIGIT 3000\n&quot;; my $result = &lt;STDIN&gt;;<br><br>&nbsp;&nbsp; # Way number two<br>&nbsp;&nbsp; # print &quot;GET DATA &nbsp; please_enter_your_number \&quot;-1\&quot; \&quot;10\&quot;&quot;; my $result = &lt;STDIN&gt;;

&nbsp;&nbsp;  } print STDERR &quot;$result&quot;; <br clear="all"> --  Camilo Echeverry Your life would be very empty if you had nothing to regret.