<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8">
</head>
<body bgcolor="#FFFFFF" text="#000000">
Коллеги, столкнулся с тем что код такого вида , используемый для
поиска свободных 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
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
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>
</body>
</html>