На проходящей сегодня виртуальной конференции разработчиков языка 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->@*" вместо "@{ $aref }" и "$href->%{ ... }" вместо "%$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. Хороший код - это прежде всего код, который работает и решает возложенные на него задачи, а не только качественно оформленный код.