Есть в CPAN такое замечательное семейство модулей — Coro. Эти модули позволяют программировать на перле с использованием корутин.
Читать полностью »
Рубрика «perl» - 15
Coro и ещё одна реализация rouse-callback
2013-10-17 в 6:30, admin, рубрики: event loop, libev, perl, корутины, метки: event loop, libev, perl, корутиныОпределение веса значимости пользователей по отношению друг к другу на основании их действий (Tarantool+Lua)
2013-10-10 в 6:13, admin, рубрики: AnyEvent, Lua, perl, tarantool, Блог компании Mail.Ru Group, метки: AnyEvent, lua, perl, tarantoolЕсть система с множеством пользователей. Каждый пользователь системы может осуществлять действия по отношению друг к другу. На основании этих действий рассчитывается вес. Необходимо иметь возможность для каждого пользователя получать список остальных пользователей системы, отсортированный в порядке убывания веса. Характеристики весов у бездействующего пользователя меняться не должны.
.png "Определение веса значимости пользователей по отношению друг к другу на основании их действий (Tarantool+Lua)")
В своей прошлой статье я описал базовые понятия и средства для начала роботы с тарантулом. В этой статье попробую уделить больше внимания использованию хранимых процедур в Тарантуле на примере одной игровой задачи.
Реализация голосового меню на perl через usb модем Huawei e1550
2013-09-13 в 4:46, admin, рубрики: dtmf, linux, perl, usb модем, голосовое меню, Программирование, телефония, метки: dtmf, linux, perl, usb модем, голосовое меню, Программирование, телефонияСовсем недавно я написал пост в котором дал немного теории, и описал практическую реализацию скрипта производящего голосовой обзвон (оповещение) абонентов по списку через usb модем Hyawei e1550. В одном из комментариев был задан вопрос о том как получить во время голосового соединения данные о нажатии кнопок на телефоне абонента. Детальное изучение этого вопроса и привело к созданию этого поста.
В данной статье будет представлена реализация колосового меню, с функциями:
— записи голосового сообщения
— выполнения системных команд
Все это стало возможным благодаря реализации декодера DTMF сигналов основанного на алгоритме Гёрцеля.
В качестве бонуса — архив с реализованными на perl-е скриптами голосового меню.
Читать полностью »
Коктейли к дню программиста
2013-09-11 в 4:58, admin, рубрики: diy или сделай сам, epic fail, memory leak, perl, ruby, метки: epic fail, perl, ruby, профит 
Здравствуй!
Осталось несколько дней до дня программиста и, конечно, в эту 13-ю пятницу, многие из пользователей хабра буду отмечать этот праздник. Буду отмечать и я.
По случаю профессионального праздника, мне бы хотелось поделиться с хабравчанами рассказом о своём небольшом кулинарном проекте, который удалось реализовать буквально накануне. Думаю из названия поста уже стало понятно, что это — коктейли для программиста. Кажется, до этого момента IT и миксологию еще никто не пытался объединить, а потому у меня есть некоторая надежда на успех моего начинания.
Все началось вот с чего: моя супруга увлекается кулинарией и ведет небольшой кулинарный блог. В прошлом году на мой день рождения она пригласила к нам в гости на кухню настоящего бармена из барного startup-проекта БАРаДОМа.нет. С момента знакомства с Артёмом (барменом который превратил мой день рождения в домашнюю барную вечеринку), у меня появилась идея: найти рецепты (или придумать самим) коктейлей, которые бы вписались в IT-тематику.
Итогом нескольких дней активной переписки с Артёмом стала вот такая небольшая коктейльная карта:
- Ruby
- Python
- Суровый Perl
- JMP (aka Assembler)
- Profit!
- Epic fail
- Memory leak
Под катом рецепты и фото коктейлей, которые мы сделали на нашей кухне. И, да, я не без причины публикую этот пост не в пятницу, а немного раньше.
Perl Golf от REG.RU на YAPC::Europe 2013
2013-09-10 в 11:34, admin, рубрики: perl, reg.ru, Блог компании REG.RU, ненормальное программирование, метки: perl, reg.ru 
С 12-го по 14-е августа в Киеве прошла очередная конференция perl-разработчиков YAPC::Europe 2013. Расширяющие сознание доклады, инсайдерская информация от разработчиков Perl 5 и Perl 6, живые легенды из мира Perl (включая самого Ларри Уолла!), речной круиз и замечательное общение в пабах кулуарах — всё было. Мероприятие заслуживает самой высокой оценки, а организаторы и докладчики (да и все остальные участники конференции) — всяческих похвал и благодарностей.
Однако, общеизвестно, что кроме обычных человеческих радостей perl-программисты склонны к развлечениями особенным, нормальным «хомо сапиенсам» не всегда понятным и близким.
Итак, как мы устроили Perl Golf на YAPC, и что из этого вышло.
Читать полностью »
Небольшая заметка про utf-8 в Mojolicious
2013-08-30 в 10:41, admin, рубрики: mojolicious, mysql, perl, utf8, метки: mojolicious, mysql, perl, utf8 Я потратил чуть больше времени, чем мне хотелось бы, борясь с Юникодом в своем Mojo проекте, и теперь хочу поделиться полученым опытом, чтобы сэкономить вам несколько драгоценных минут и нервных клеток.
Читать полностью »
Хакаем Transcend WiFi SDHC карту памяти
2013-08-28 в 20:05, admin, рубрики: diy или сделай сам, linux, perl, SDHC, shell, Transcend, wifi, беспроводная карта памяти, информационная безопасность 
Перевод немного вольный, но смысл не потерян. Я (переводчик) заинтересовался этой карточкой давно и почти сразу заказ её, сегодня забрал с почты и не могу нарадоваться, но хочется больше, чем дает Transcend, а карточка, между прочим, Linux сервер с WiFi! Очень много буковок.
С недавнего времени я стал счастливым обладателем карты памяти Transcend WiFi SD, которая позволяет мне передавать фотографии с моей «зеркалки» (которая вообще то Sony NEX, зато компактная) на любое устройство с WiFi за несколько секунд. А так как мне нравится делать фотографии и делиться с ними на лету, то SD карточка, умеющая без проводов передавать картинки на мой телефон, кажется прекрасным решением. И это было так! (хотя всё еще так). Мобильное приложение может… не, должно быть получше (зачем скачивать 7МБ картинку для просмотра, чтобы потом ЕЩЕ раз скачать её, нажав на «Скачать»?), но вообще оно делает своё дело!
Читать полностью »
Как себя чувствует RADIUS?
2013-08-28 в 10:45, admin, рубрики: perl, radius, tcpdump, системное администрирование, Телекомы, метки: perl, radius, tcpdump Сегодняшний день начался с неожиданного. Один из наших Заказчиков сообщил, что он считает, что RADIUS сервер не справляется с работой, поскольку NAS отсылает большое количество запросов повторно. Так как это достаточно серьезное обвинение, его следовало немедленно проверить. Описанию того как это сделать, посвящена эта статья (материал ориентирован на начинающих разработчиков и системных администраторов).
Читать полностью »
Perl6 — Ещё немного о блоках (Phasers)
2013-08-20 в 20:44, admin, рубрики: async, Enter, lazy, perl, perl6, Программирование, метки: async, Enter, lazy, perl6 1. Особенности работы с переменными и литералами в Perl6
2. Perl6 — Операции над переменными, анонимные блоки
3. Perl6 — Условные операторы, циклы
4. Perl6 — Работа с функциями
5. Perl6 — Классы
6. Perl6 — Ввод-вывод, модули
7. Perl6 — Комментарии, пробельные символы, скобки
8. Perl6 — Перегрузка операторов
9. Perl6 — Работа с типами данных
10. Perl6 — Обработка исключений
В прошлой статье мы говорили об отлове исключений, что происходило в специальном вложенном блоке CATCH. На самом деле этот блок является особой разновидностью — Phasers (я просто не могу перевести это слово). Phasers — это специальные вложенные блоки, которые выполняются при определенных условиях. С чем же их готовить увидите под катом.
Читать полностью »
Вся правда о UTF-8 флаге
2013-08-19 в 18:43, admin, рубрики: perl, Unicode, utf-8, кодировки, метки: perl, Unicode, utf-8, кодировки 
Распространённое заблуждение состоит в том, что строки символов, в отличие от строк байтов, имеют UTF-8 флаг установленным.
Многие догадываются, что если данные являются ASCII-7-bit, то UTF-8 флаг просто не важен.
Однако, на самом деле, он может быть установлен или сброшен, как и у символов, так и абсолютно произвольных бинарных данных.