В первой записи на сайте сообщается:

«После продолжительного перерыва возрождается группа пользователей Perl в Софии, или Софийских перл-монгеров. Это происходит раз в ответ на быстрое развитие языка Perl в последние годы и предстоящего выхода нового Perl 6. Идея по возобновлению группы пришла во время второго Perl-воркшопа в январе 2010 года».

Рецепт: в магазине приобретается красная футболка по размеру, и по пути на работу (на велосипеде) она завозится в контору AKDR.

Передняя сторона будет выглядеть так:

Оборотную сторону пока показывать рано.

Решение о том, пройдет YAPC::Europe 2011 во Франкфурте или в Риге, еще не принято и не обнародовано :-)

Но я — нет — не сижу без дела. Вот в блокнотики рисую, например.

На спане — модуль для Perl-гольфистов Acme::Minify.

Дано: хеш вида

my %what_when = (
    13 => 'Lunch',
    17 => 'Tea',
    20 => 'Dinner',
     9 => 'Breakfast',
);

Требуется: сформировать список пар, отсортированных по ключу хеша (в примере — по времени):

my @schedule = (
    [9,  'Breakfast'],
    [13, 'Lunch'],
    [17, 'Tea'],
    [20, 'Dinner'],
);

Вот модуль Time::Business, судя по описанию, полезный: умеет переводить рабочие часы в «общечеловеческие». CPAN сообщает о десятках успешных тестов на разных платформах. Но в действительности к модулю прилагается только тест use_ok (это не самое страшное), а код из краткого описания не работает:

Понятно, что дальнейшее чтение документации помогает добиться работоспособности, но внутренний голос сразу начинает говорить о том, что как-то и все остальное некрасиво: и странный формат записи времени (а что, если записать 0800 — не в восьмеричном ли формате это получится?), и капслок в именах ключей, и отсутствие предопределенных значений — собственно, все то, что замечаешь при первом взгляде, но что лишь усиливает негатив после того, как первый тест не заработал.

Помимо собственно описания мероприятия автор делится некоторыми мыслями по поводу того, как сделать хакатоны максимально эффективными.

«В чем же секрет такой высокой производительности хакатона? Пожалуй, рецепт успеха выглядит так: „Сформулируйте цели мероприятия. Найдите самый маленький конференц-зал, вместите в него пару дюжин толковых программистов. Обязательно пригласите ведущих специалистов в выбранной области, возьмите на себя их расходы на поездку. Каждое утро проводите брифинг о целях нового дня и о достигнутых результатах, чтобы участникам было к чему стремиться и чего добиваться. В течение трёх дней кормите, поите и выдавайте программистам столько кофе, сколько они потребуют. В конце последнего дня подведите итог и отведите работяг в кафе или бар. Если сделаете все правильно, то результат вас ошеломит‟. Всего-то делов».

— Как нужно правильно кастовать полученный объект к нужному типу, чтобы с ним можно было работать?

— (A*)(SvIV((SV*)SvRV(cppObject))).

— Большое спасибо. Все заработало.

Модуль Class::Accessor создаст в пакете MyTest метод mytest(), который должен работать как пара сеттер — геттер для установки поля mytest (точнее, $self->{mytest}). Тестируем:

И видим, что никакое значение mytest=test не устанавливается. Комментируем в файле MyTest.pm строку, подключающую модуль Test::Deep, и все работает:

Раскомментируем обратно и попробуем немного по-другому:

Опять не работает. Но по-другому мы пробуем уже после того, как заглянули в исходник Test::Deep и увидели там безусловный экспорт функции set:

В свою очередь, внутри методов-аккессоров, которые создает Class::Accessor, используются вызовы $self->set(...), которые в модуле, унаследованном от него, попадают напрямую в Test::Deep::set().

Неуклюжее быстрое решение: подсказать компилятору, куда направлять внутренние вызовы методов set:

Сделали sandbox на новеньком сервере, стали запускать тесты — половина не работает. Вместо ok видим wanted a data type, got `i8'. Кто говорит? Слон? Ошибку можно разглядеть в XML, который как-то где-то формируется через третьи руки. Разумеется, автор кода на этой неделе в отпуску, поэтому тратим еще час на то, чтобы выяснить, что сообщение об ошибке формирует модуль RPC::XML.

Мы-то уже догадались, что i8 — скорее всего тип целочисленных данных, потому что в стандарте есть тип i4, но про i8 там ни слова.

Еще какое-то время, и выясняется, что на другом сервере такой ошибки нет. Остается догадаться посмотреть $RPC::XML::VERSION. Ну точно, в одном месте — 1.36, в другом — 1.41.

Читаем документацию и удивляемся: тип i8 добавлен как нестандартный. Потому что им уже кто-то пользуется. Смотрим на спан и удивляемся еще раз: последняя версия там — 0.70. Ij? (в русской раcкладке — шо?) Может github? Там тоже 0.70. Начинаем подозревать всех в том, что они втихаря переписывают модуль прямо на серверах. Но в итоге смотрим в исходник версии 0.70 и видим, что версия модуля — 1.50. Релаксируем.

А выведут они следующее.

Программа А.

Программа Б.

Программа В.