ginnie, а вот так. Например, столкнулся на днях с тем, что Math::Prine::XS в некоторых случаях вылетает с ошибкой "Ошибка сегментации", а некоторых работает медленнее самописных функций. Просто тут меня затянуло в http://projecteuler.net (не сочтите за рекламу, я не имею никакого отношения к этому ресурсу), а там нужно считать оочень много и ооочень быстро.



Давайте по порядку, может я чего не понимаю?



Разбираем по строкам.
1) Создаем ключи в хеше от 1 до поданного в функцию значения (пусть это будет n), значения которых - undef
2) локализуем переменную $_ и заносим в нее значение хеша в скалярном контексте. Это будет "k/b", где k - количество ключей, b - точно не скажу, но вроде как количество отведенной памяти под хеш...
3) проверяем регулярным выражением {/(.*)} на совпадение (а оно будет, если n>=1, иначе выдаст ошибку (на нечисловых значениях еще при заполнении хеша); при n < 1 совпадения не будет )
После чего return (по крайне мере у меня) трактует m{/(.*)} в скалярном контексте (а не списочном, поэтому ему по барабану группирующие скобки в регулярном выражении), и возвращает 1 в случае совпадения (n>=1), 0 иначе

Поправьте, если что не так. Испытания провел, вроде все так.

Добавлено через 12 минут и 29 секунд
Кстати, на злобу дня: http://habrahabr.ru/blogs/perl/38014/

Уважаемый AlexPet, Вы правы, я не обратил внимание на контекст для регулярного выражения. Он зависит от контекста вызова функции next_power_of_two(). Указанный выше вариант верно работает в списочном контексте (например print next_power_of_two(7);)

Про чужие XS-модули понятно, я имел ввиду свои XS-модули на основе корректно работающего C-кода.

Вот покопался в perldata и вот что вычитал:



Однако перл обычно выделяет число сегментов памяти под хэш как "min k, 2^k > n" (где n - количество элементов в хеше; установлено экспериментальным путем   )
Только в том-то и дело, что "обычно". Например:
n next_power_of_two
1..7 8
8 16
9 16
...
1023 1024
1024 1024

Так что я бы относился с осторожностью к значению, выдаваемому этой функцией   И кто знает, что она так себя регулярно ведет на всех платформах? Хотя все может быть.

AlexPet, ginnie, 



Вот размышления человека и его тесты  http://acius2.blogspot.com/2007/11/calcula...power-of-2.html
А вот MATLAB

У меня возник вопрос, что не так с функцией? 
А какой контекст подразумевался ещё? Или как вы пытались использовать?

А вот насколько я в курсе "нормальная" реализация ))


Добавлено через 6 минут и 59 секунд
  

Это сообщение отредактировал(а) nitr - 27.8.2008, 21:54

Уважаемые коллеги, хочу обратить ваше внимание, что функцию я привел не как пример рабочего кода, а как пример кода, использующего нюансы Perl и трудного для понимания другими разработчиками.

Уважаемый nitr, результат поиска по шаблону (рег. выражения в конце функции) зависит от контекста, в котором он выполняется, а этот контекст в свою очередь зависит от контекста вызова функции. В скалярном контексте возвращает 1 (совпадение найдено) или 0 (не найдено), в списочном - захваченную скобками подстроку.



выведет 1

 
Хотел прояснить для себя правильное название контекста. Я всегда пишу списочный, некоторые коллеги, а также КэмелБук (в некоторых местах) используют слово списковый. Посмотрел на сайте gramota.ru: списочный - такое слово есть, а списковый - нет. Может кто-нибудь прояснить ситуацию (у меня в школе тройка была по русскому языку    ) 

Это сообщение отредактировал(а) ginnie - 27.8.2008, 22:43

лично это я понял  Я просто привел, более читабельный и думаю далеко "немедленный" код ;) Попрошу многоуважаемого amg сказать своё мнение по поводу производительности.


Спасибо. А то я не понял, что вы имели ввиду  Это уже считаю "недоработкой" данного кода, но как уже говорилось выше - он всего лишь пример... Тем более недавно обсуждали такой подход return /regexp/.

Как выход:

Мне кажется, что всё же правильно будет - СПИСКОВОЙ контекст, по крайней мере в большинстве книг, употребляется именно это слово.

Уважаемый korob2001, слово СПИСКОВОЙ в словорях на gramota.ru тоже отсутствует. Интересует правильный вариант именно с точки зрения правил русского языка (т.к. писать с ошибками в нашем возрасте уже неприлично   ).

Добавлено через 2 минуты и 42 секунды
Уважаемый nitr, приведенная мной функция next_power_of_two() никоим образом не является более производительным вариантом.

ginnie,  Тогда интересно чем руководствовался человек, который писал данный код, т.к. из лит-ры он должен был написать второй код  Тут больше на "магию" Perl похоже...

Я тоже считаю "Списковый". Надо взять словообразовательный словарь, найти слово "список" и посмотреть, какое "прилагательное" из него образовывается 

Мдя...


НО!!! в Гугле не нашёл "списочный элемент", в таком же контексте как "списковый элемент" 
Скорее всего будет верно все предложения/словосочетания приводить к слову "список".
Например, списковый/списочный элемент - элемент списка 

http://www.codenet.ru/webmast/perl/CGI-Perl.php

В этой статье списочный. Но как-то не по-русски читается )) Я буду склоняться к словосочетаниям "элемент списка" 

Это сообщение отредактировал(а) nitr - 28.8.2008, 17:39

списковой - такого слова и в викисловаре нет, а вот списковый - в викисловаре присутствует, но статья незавершенная




Это все нуна копать в морфологию 

Только что посмотрел в книгах по Perl.

Perl - Специальный справочник (Стивен Холзнер).
Стр. 70

И в той же книге, на следующей странице:
Стр. 71


Самоучитель Perl (Матросов, Чаунин)
Стр. 53


Программирование на Perl 3-издание (Уолл, Кристиансен, Орвант).
Стр. 105
 
Если честно, раньше особого внимания не обращал на это, потому пологал, что везде написано именно так. Дальше смотреть не стал, ежу понятно, что как кому хочется так и тот и пишет. ;))))))

проще list  

korob2001, да, поэтому и возник у ginnie вопрос, как верно 
Получается "переводам" можно не верить, а такие "бренды" их готовили, странно. Я проверил, ни в одном современном или советском словаре нет слова "списковый", от слова "список" образуется "списочный" и это будет верно так писать, как бы не казалось, что язык ломается от такого произношения, имхо, дело привычки  .

Будем считать что слово "списковый" - perl'овый сленг . Кто "за"?

Lingvo говорит, что "списковый" - list-oriented, а "списочный" - просто "list". В оригинальной документации везде используется словосочетание "list context". Да и просто "списковый" как-то не звучит)