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

Значительная смена номера версии выступит своеобразным разделителем перехода к новой модели наращивания функциональности языка Perl без ощутимого нарушения обратной совместимости.
Предполагается, что создание Perl 7 поможет привлечь к использованию Perl новых разработчиков и наладить процесс добавления в язык значительных новых возможностей, сохраняя при этом совместимость с кодовой базой существующих проектов. Номер 7 выбран так как Perl 6 был использован при разработке языка, который теперь развивается под отдельным именем Raku. Первый релиз Perl 7 ожидается в следующем году. Ветка Perl 5.32 станет последней в серии Perl 5 и её планируется поддерживать от 5 до 10 лет.

Наиболее заметным изменением в Perl 7 станет включение по умолчанию режима «strict», подразумевающего строгую проверку объявления переменных, использования символьных указателей и присвоения подпрограмм. Использование «use strict» является хорошим тоном и применяется большинством разработчиков. Аналогично по умолчанию планируют включить обработку предупреждений («use warnings»).

В Perl 7 также рассчитывают стабилизировать и включить по умолчанию некоторые уже существующие экспериментальные возможности, такие как сигнатуры функций («use feature ‘signatures'»), позволяющие при определении функции определить входящие аргументы и автоматизировать проверку их числа (можно будет писать «sub foo ($left, $right) {» вместо «sub foo { my($left, $right) = @_;»). Планируют включить по умолчанию и поддержку оператора «isa» для проверки того, является ли объект экземпляром указанного класса или классом, производным от него («if( $obj isa Package::Name )», а также операций постфиксного разыменования (postderef) «$sref->$*» вместо «${ $sref }», «$aref->@*» вместо %{ … }» вместо «%$href{ … }».

Претендентами на отключение по умолчанию в Perl 7 являются:

  • Косвенная нотация вызова объектов («no feature qw(indirect)») — устаревший способ вызова объектов, при котором вместо «->» используется пробел («method $object @param» вместо «$object->$method(@param)»). Например, вместо «my $cgi = new CGI» нужно будет всегда использовать «my $cgi = CGI->new».
  • Голые файловые дескрипторы без объявления переменных («no bareword::filehandle») — использование конструкций вида «open FH, $file» будет приводить к ошибке, нужно использовать «open my $fh, $file». Изменение не затронет стандартные файловые дескрипторы STDIN, STDOUT, STDERR, ARGV, ARGVOUT и DATA.
  • Фиктивные многомерные массивы и хэши в стиле Perl 4 («no multidimensional»).
    Например, указание «$hash{1, 2}» будет приводить к ошибке, нужно использовать промежуточный массив, например «$hash{join($;, 1, 2)}».

  • Объявление прототипов в стиле Perl 4 (нужно использовать «use :prototype()»).

В более отдалённых планах по умолчанию рассчитывают включить поддержку Unicode, что избавит разработчиков от указания «use utf8» в коде. Для модулей и скриптов, в которых возникнут проблемы с новыми настройками по умолчанию, предусмотрена возможность возвращения поведения Perl 5 через добавление в код строки «use compat::perl5». Отдельные настройки также сохранятся и их можно будет изменить по отдельности.

Дополнение: Leon Timmermans выступил с критикой новой инициативы. Он не верит, что для Perl 7 возможно будет обеспечить линейный прогресс и вероятнее всего в итоге возникнет очередной затянувшийся форк, как было при переходе на Python 3. Ключевой проблемой является то, что /usr/bin/perl является инфраструктурой, которую нельзя ломать по тем же причинам, что и нарушать совместимость кода на shell и awk. На /usr/bin/perl завязано множество приложений, сборочных утилит и системных скриптов. Включение strict и отключение прототипов нарушит работу огромного числа существующих скриптов, поэтому маловероятно, что дистрибутивы когда-нибудь заменят /usr/bin/perl на perl7 и возникнет ситуация похожая на затянувшийся переход /usr/bin/python на python3.

Кроме того, при создании Perl 7 упускается из виду, что Perl используется не только для написания больших приложений, но и востребован для однострочников, для которых использование «strict» лишено смысла. В конечном счёте спорен критерий хорошего кода, озвученный при анонсе Perl 7. Хороший код — это прежде всего код, который работает и решает возложенные на него задачи, а не только качественно оформленный код.