AP
условно-сравнима. алгоритм выплоняется в нынешних реалиях быстрее доступа к памяти
$a[rand()*1e8] — ты, кстати, понимаешь, что этот код даёт непредсказуемое количество реаллокаций памяти?Size: a a a
2020 January 11
AP
AT
В смысле? Он в среднем должен сожрать память. Ты про какие реаллокации?
AP
про реаллокацию массива для
@aAP
вот смотри, допустим первы ранд выдал 1, ты создал массив на 1 элемент. а следующий на тыщу — перл реаллоцирует память для массива, в перле нет спарсед массивов, все элементы до тысячного будут тоже аллоциорваны, хоть и андефы. а следующий ранд 10 тыщ и снова реаллокация с копированием того что уже есть
AT
да. вот, к примеру, в чём принципиальная разница межде
my %h; for(my $i = 0;$i < 1000; ++$i) { $h{$i} = $i }
и my @a; for(my $i = 0;$i < 1000; ++$i) { $a[$i] = $i }Так какой ты хотел ответ на изначальный вопрос? )
AP
я о двух принципиальных частях уже говорил
AT
Ладно, наверное на сегодня хватит
AT
Кому не влом, замеряйте, сколько будет выполняться
perl -le 'for my $j (1e9..1e9+100) { my @a; for(my $i = 0;$i < 10000; ++$i) { $a[rand()*1e9] = $i } }'VO
напомнили вы мне алгоритм подсчета бит в числе через вычисление идеальной хэш-функции
TZ
Крайне странная конструкция, так нигде не применяется ))
$a[rand()*1e9] = $i
$a[rand()*1e9] = $i
TZ
я не представляю, что этим можно измерить, только скорость переназначения элементов массива и фсе
AP
и ещё немного странно делать бенчмарк системным
time вместо соответствюущего модуляAT
Да без разницы в данном случае:
# /bin/time perl -le 'for my $j (1e9..1e9+100) { my @a; for(my $i = 0;$i < 10000; ++$i) { $a[rand()*1e9] = $i } }'
132.87user 0.51system 2:13.40elapsed
# /bin/time perl -le 'for my $j (1e9..1e9+100) { my @a; for(my $i = 0;$i < 10000; ++$i) { $a[rand()*1e9] = $i } }'
132.87user 0.51system 2:13.40elapsed
AP
правильно было бы сначала таки выделить память
AT
# /bin/time perl -le 'for my $j (1e9..1e9+100) { my %h; for(my $i = 0;$i < 100000; ++$i) { $h{rand()*1e9} = $i } }'
9.57user 0.00system 0:09.58elapsed 99%CPU
9.57user 0.00system 0:09.58elapsed 99%CPU
TZ
time - проще и мне больше нравится, например ) так что time - круто
AP
тайм меряет слишком много
AT
Крайне странная конструкция, так нигде не применяется ))
$a[rand()*1e9] = $i
$a[rand()*1e9] = $i
Ессно, это микробенчмарк, надо засрать весь массив
TZ
а кто тебе мешает засирать его последовательно
$a[$i] = rand()*1e9
?
$a[$i] = rand()*1e9
?