<div dir="ltr">Hello,<br>I am using skypopen module and i need catch API answers from skype client. I wrote simple perl script:<br><br>require ESL;<br>my $con = new ESL::ESLconnection("localhost", "8021", "ClueCon");<br>
while (1){<br> $con->sendRecv("log 7");<br> $e = $con->bgapi("skypopen sk1 PING");<br> #$uuid = $e->getHeader("Job-UUID");<br> #print $e->serialize("plain");<br>
$n = 2;<br> while($n){<br> $event = $con->recvEventTimed(100);<br> if ($event and $event->getHeader("Log-File") eq "skypopen_protocol.c") {<br> push(@dmesg, $event->getBody());<br>
<br> }<br> $n--;<br> }<br> print "@dmesg\n";<br> sleep(3);<br> @dmesg = ();<br>}<br><br>But sometimes I get empty array, because script catch differect events. How to catch events from ESL socket by UUID?<br>
</div>