http://www.perlmonks.org?node_id=1040607


in reply to Test if multiple variables are defined

you are free to disable specific warnings locally:

perl -we 'my $a; { no warnings qw/uninitialized/; $a =~ s/x/y/;  }'

Sometimes this is the clearest solution!

Cheers Rolf

( addicted to the Perl Programming Language)