<div dir="ltr"><div>I am working on a freeswitch sipVicious blocker.</div><div>I would like to run it from within freeswitch.</div><div>Is there a way to get events while running within freeswitch without running a socket via ESL::ESLconnection?</div><div><br></div><div>#!/usr/bin/perl</div><div>use strict;</div><div>use warnings;</div><div>use ESL;</div><div>my $c = new ESL::ESLconnection(</div><div><span class="" style="white-space:pre">        </span>&quot;localhost&quot;,</div><div><span class="" style="white-space:pre">        </span>&quot;8021&quot;,</div><div><span class="" style="white-space:pre">        </span>&quot;ClueCon&quot;</div><div>);</div><div>$c-&gt;events(</div><div><span class="" style="white-space:pre">        </span>&quot;plain&quot;,</div><div><span class="" style="white-space:pre">        </span>&quot;CHANNEL_CREATE CUSTOM sofia::pre_register&quot;</div><div>);</div><div>while ($c-&gt;connected()) {</div><div><span class="" style="white-space:pre">        </span>my $event = $c-&gt;recvEvent();</div><div>#do some stuff </div><div>}</div></div>