Активируйте virtualenv через матрицу, как развертывают пользователя

Новые Блочные операции

я сказал бы способность развернуть язык, создание псевдо блочных операций является тем.

1. Вы объявляете прототип для sub указание, что он берет ссылку кода сначала:

   sub do_stuff_with_a_hash (&\%) {
       my ( $block_of_code, $hash_ref ) = @_;
       while ( my ( $k, $v ) = each %$hash_ref ) { 
           $block_of_code->( $k, $v );
       }
   }
   

2. можно тогда звонить, это в теле как так

   use Data::Dumper;
   
   do_stuff_with_a_hash {
       local $Data::Dumper::Terse = 1;
       my ( $k, $v ) = @_;
       say qq(Hey, the key   is "$k"!);
       say sprintf qq(Hey, the value is "%v"!), Dumper( $v );
   
   } %stuff_for
   ;
   

(Data::Dumper::Dumper другое полускрытое сокровище.) Уведомление, как Вам не нужно sub ключевое слово перед блоком или запятая перед хешем. Это заканчивает тем, что смотрело много как: map { } @list

Фильтры источника

кроме того, существуют фильтры источника. Куда Perl передаст Вас код, таким образом, можно будет управлять им. И это и блочные операции, являются в значительной степени don't-try-this-at-home типом вещей.

я сделал некоторые аккуратные вещи с фильтрами источника, например, как создание очень простого языка для проверки времени, позволив короткие остроты Perl для некоторого принятия решений:

perl -MLib::DB -MLib::TL -e 'run_expensive_database_delete() if $hour_of_day < AM_7';

Lib::TL просто просканировал бы и для "переменных" и для констант, создал бы их и заменил бы ими по мере необходимости.

Снова, фильтры источника могут быть грязными, но мощны. Но они могут смешать отладчики что-то ужасное - и даже предупреждения могут быть распечатаны с неправильными номерами строки. Я прекратил использовать Damian Переключатель , потому что отладчик потеряет всю способность сказать мне, где я действительно был. Но я нашел, что можно минимизировать повреждение путем изменения маленьких разделов кода, хранения их на той же строке.

Рычаги Сигнала

Это часто достаточно делается, но это не все это очевидное. Вот умереть обработчик что свиные спины на старой.

my $old_die_handler = $SIG{__DIE__};
$SIG{__DIE__}       
    = sub { say q(Hey! I'm DYIN' over here!); goto &$old_die_handler; }
    ;

, Который означает каждый раз, когда некоторый другой модуль в коде хочет умереть, они должны прибыть к Вам (если кто-то еще не делает разрушительную перезапись на $SIG{__DIE__}). И Вы можете быть уведомлены, что кто-то вещи что-то - ошибка.

, Конечно, для достаточного количества вещей можно просто использовать END { } блок, если все, что Вы хотите сделать, является уборкой.

overload::constant

можно осмотреть литералы определенного типа в пакетах, которые включают модуль. Например, если Вы используете это в Вашем import sub:

overload::constant 
    integer => sub { 
        my $lit = shift;
        return $lit > 2_000_000_000 ? Math::BigInt->new( $lit ) : $lit 
    };

это будет означать, что каждое целое число, больше, чем 2 миллиарда в пакетах вызова, будет изменено на Math::BigInt объект. (См. перегрузка:: постоянный ).

Сгруппированные Целочисленные Литералы

, В то время как мы в нем. Perl позволяет Вам разбивать большие количества в группы из трех цифр и все еще вытаскивать parsable целое число из него. Примечание 2_000_000_000 выше для 2 миллиардов.