Re: Idiom for setting variables to empty string if capture is undefined?

an idiom for avoiding this annoyance without turning the warnings off?

If you know the warnings are a possibility for particular statements, why not disable the warnings for those particular statements?:

my ($a, $b, $c, $d) = 'abcd' =~ /(w)(x)(y)(z)/;
{
    no warnings 'uninitialized';
    print "$a $b $c $d";
}
[download]

Or:

printf "%s %s %s %s\n", $a//'', $b//'', $c//'', $d//'';
[download]

Or, ensure they get some value:

my ($a, $b, $c, $d) = ( 'abcd' =~ /(w)(x)(y)(z)/, '','','','' );
[download]

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority". I knew I was on the right track :)

In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on Re: Idiom for setting variables to empty string if capture is undefined? Select or Download Code


Syntactic Confectionery Delight
	PerlMonks