После года разработки представлена новая стабильная ветка языка программирования - Perl 5.16. В рамках подготовки релиза 5.16 было изменено около 590 тыс. строк кода, изменения затронули 2500 файлов, в разработке приняли участие 139 разработчиков.

Ветка 5.16 выпущена в соответствии с утверждённым два года назад фиксированным графиком разработки, подразумевающим выпуск новых стабильных веток раз в год и корректирующих релизов - раз в три месяца. 20 июня планируется выпустить первый корректирующий релиз Perl 5.16.1, в котором будут исправлены наиболее значительные ошибки, выявленные в процессе внедрения Perl 5.16.0. Одновременно объявлено о прекращении поддержки ветки Perl 5.12, для которой в будущем могут быть выпущены обновления только в случае выявления критических проблем с безопасностью.

Ключевые улучшения, добавленные в Perl 5.16:

  • Признак __SUB__ теперь возвращает ссылку на текущую подпрограмму, что позволяет упростить написание рекурсивных подпрограмм (например, можно использовать "__SUB__->(...)" для вызова текущей подпрограммы). Подобное поведение действует только при указании "use feature 'current_sub'" или "use v5.16";
  • Возможность определения нескольких областей с поддержкой разных языковых возможностей в коде через множественное указание директив "use VERSION", например:
    
     use 5.016;
     # включены все новые возможности Perl 5.16
     use 5.014;
     # включены только возможности Perl 5.14
    
  • При указании "use v5.12" или более новой версии по умолчанию включается strict-режим, который можно отменить явно указав "no strict;". При использовании "use v5.16" по умолчанию не поддерживается переменная "$[", для включения которой следует указать "use feature 'array_base'";
  • Более непротиворечивая реализация оператора eval, который теперь не полагается на текущую кодировку для восприятия строкового аргумента как набора байт или символов. Для явного определения типа аргумента введены модификации eval: unicode_eval, который всегда рассматривает входную строку как unicode-последовательность, и evalbytes, который манипулирует входными данными как набором байт;
  • Переработанная реализация функции substr, которая теперь более корректно обрабатывает ситуацию с изменением содежимого строки при вызове функции через указатель. В частности, теперь учитывается новый размер строки. Например:
    
     my $string = "string";
     my $lvalue = \substr $string, -4, 2;
     print $$lvalue, "\n"; # выведет "ri"
     $string = "bailing twine";
     print $$lvalue, "\n"; # в perl 5.16 выведет "wi",
    
    
    
    
    
    
    # в прошлых версиях напечатало бы "il", так как смещение вычислялось относительно размера первой строки
    
  • Поддержка стандарта Unicode 6.1 и реализация серии улучшений, связанных с поддержкой Unicode. Например, улучшено использование Unicode-символов в именах модулей, методов и других сущностей. Добавлен новый оператор fc и экранирующий символ \F для выполнения операции foldcase, осуществляющей корректное приведение символов в верхний регистр для всех языков;
  • Представлен новый внутренний Pad API для манипулирования структурами данных с лексическим представлением подпрограмм;
  • Возможность записи в переменную $$, используемую в контексте "local $$" (запись в $$ была запрещена начиная с Perl 5.8);
  • Переменная $^X теперь преобразуется в абсолютный путь во FreeBSD, Mac OS X и Solaris (ранее преобразование выполнялось только при наличии псевдо-ФС /proc);
  • Из-за потенциальных проблем с безопасностью функция is_utf8_char() объявлена устаревшей, вместо неё следует использовать is_utf8_char_buf(). При использовании is_utf8_char возможны сценарии, когда некорректная входная строка может привести к чтению до 12 байт данных из области за пределами выделенного буфера;
  • Содержимое lib/unicore признано устаревшим, следует использовать Unicode::UCD;
  • Проведена работа по оптимизации производительности операций с Unicode-строками внутри регулярных выражений. При сопоставлении вместо линейного поиска теперь используется бинарный поиск. Значительно увеличена скорость функций substr и glob;
  • В комплект включено новое руководство по созданию объектно-ориентированных программ на Perl и полностью переписано руководство по объектно-ориентированным возможностям языка;
  • В базовую поставку добавлены новые модули: arybase (с реализацией переменной "$[") и PerlIO::mmap;
  • Обновлены версии большого числа входящих в базовую поставку модулей;
  • Отмечается, что в следующей версии из базовой поставки будут исключены модули CPANPLUS, Filter::Simple, PerlIO::mmap, Pod::LaTeX, Pod::Parser, SelfLoader, Text::Soundex и Thread.pm. Также вероятно будет прекращена поддержка платформ BeOS, djgpp, dgux, EPOC, MPE/iX, Rhapsody, UTS, VM/ESA.


Источник: http://www.opennet.ru/opennews/art.shtml?num=33912