5.10.0 has the same problem:
Of course,$ perl -e'use strict; use warnings; grep { no strict "refs"; }qw(x); ' "no" not allowed in expression at -e line 2, at end of line BEGIN not safe after errors--compilation aborted at -e line 2. $ perl -e'use strict; use warnings; grep { 0; no strict "refs"; }qw(x); ' $
would work fine, so at least there's a workaround...{ no strict "refs"; grep {0;} qw(x); }
In reply to Re: Pragma inside grep block
by RMGir
in thread Pragma inside grep block
by rovf
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |