<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div class="moz-cite-prefix">Привет<br>
берем Net::Patricia и переписываем код на неё. Radix Tree рулит!<br>
<br>
On 25.11.2016 14:00, Naim Sh via Moscow-pm wrote:<br>
</div>
<blockquote
cite="mid:9d2e29d5-e247-91cd-c875-130ab710af27@gmail.com"
type="cite">
<meta http-equiv="content-type" content="text/html; charset=utf-8">
Коллеги, столкнулся с тем что код такого вида , используемый для
поиска свободных ip v4 адресов на размерах 500-1000 элементов
отрабатывается под 5 секунд версия с map :<br>
<br>
my %ips = map { $_ => 1 } @ips;<br>
if (not exists($ips{$iponly} ))<br>
{<br>
return $iponly;<br>
}<br>
<br>
<br>
и с grep(sic!) ~2 секунду :<br>
<br>
if ( ! ( grep {$iponly eq $_ } @ips ) ) <br>
# spent 27.4ms making 814 calls to <a moz-do-not-send="true"
href="http://ironleg.azedunet.az/nytprof/NetAddr-IP-Lite-pm-197-line.html#1073">NetAddr::IP::Lite::broadcast</a>,
avg 34µs/call<br>
# spent 9.56ms making 814 calls to <a moz-do-not-send="true"
href="http://ironleg.azedunet.az/nytprof/NetAddr-IP-Lite-pm-197-line.html#266">NetAddr::IP::Lite::__ANON__[NetAddr/IP/Lite.pm:268]</a>,
avg 12µs/call<br>
{<br>
return $iponly;<br>
}<br>
<br>
Еще трабла в том что легендарный List::Util отдает быстро но
почему не тот же результат( пробовал first , none ) что и grep? <br>
<br>
коллеги это нормально на более-менее среднем сервачке ? <br>
<br>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
</blockquote>
<p><br>
</p>
</body>
</html>