Re^3: Disable Perl warning

The only reasonable way to squelch that pair of warnings is to put "no warnings;" inside reduce's code block

Well, the other reasonable way is to put no warnings 'once'; into the block.

لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Comment on Re^3: Disable Perl warning Download Code

Replies are listed 'Best First'.
Re^4: Disable Perl warning by tobyink (Canon) on Nov 27, 2012 at 10:53 UTC
Within the scope of `use strict qw(subs vars)` the `once` warning is about a hundred times more annoying than it is useful. `void` and `uninitialized` are also of questionable value, and although the idea of `numeric` warnings is good, the details are silly... `use feature qw(say); use warnings qw(numeric); my $foo = ""; say $foo+1; # why does this warn, my $bar = []; say $bar+1; # when this does not?` [download] `perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'`	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^4: Disable Perl warning
by tobyink (Canon) on Nov 27, 2012 at 10:53 UTC

Within the scope of use strict qw(subs vars) the once warning is about a hundred times more annoying than it is useful.

void and uninitialized are also of questionable value, and although the idea of numeric warnings is good, the details are silly...

use feature qw(say);
use warnings qw(numeric);
my $foo = ""; say $foo+1;  # why does this warn,
my $bar = []; say $bar+1;  # when this does not?
[download]

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

[reply]
[d/l]
[select]