On 05/18/13 19:01, Andrew Shitov wrote:
no if $] >= 5.018, "experimental::smartmatch";
А что это за интересный синтаксис такой?
К тому же почему то так не работает:
$ perl -wE 'no if $] >= 5.018, "experimental::smartmatch"; say $a ~~ $b'
Can't locate experimental/smartmatch.pm in @INC (you may need to install the
experimental::smartmatch module) (@INC contains:
/home/citrin/perl5/perlbrew/perls/perl-5.18.0/lib/site_perl/5.18.0/i386-freebsd
/home/citrin/perl5/perlbrew/perls/perl-5.18.0/lib/site_perl/5.18.0
/home/citrin/perl5/perlbrew/perls/perl-5.18.0/lib/5.18.0/i386-freebsd
/home/citrin/perl5/perlbrew/perls/perl-5.18.0/lib/5.18.0 .) at
/home/citrin/perl5/perlbrew/perls/perl-5.18.0/lib/5.18.0/if.pm line 13.
BEGIN failed--compilation aborted at -e line 1.
Так работает в 5.18 но не работает в предыдущих версиях:
perl -wE 'no warnings "experimental::smartmatch"; say $a ~~ $b'
Как все таки правильно отключать warnings по условию?
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
