Re^2: complaint: always testing defined()

But please note that you can't use this to compare to '0', or any other value that evaluates to false in a boolean context, so you should only use it to compare it with constants.

perl -wle 'if( ("0" || "") eq "0"){print "yes"} else { print "no" }'
no
[download]

Comment on Re^2: complaint: always testing defined() Download Code

Replies are listed 'Best First'.
Re^3: complaint: always testing defined() by parv (Parson) on Nov 02, 2007 at 13:42 UTC
It seems `//` (binary defined-or operator) isn't popular enough for some reason (available at least in 5.8.8) ... `my $p; $p //= 2; my $q = 0; $q //= 2; print $p , $q; # 20` [download] A few minutes later... Well, above isn't available by default in 5.8.8 but via separate patch. It seems the patch isn't popular enough for some reason. `:)`	[reply] [d/l] [select]
Re^4: complaint: always testing defined() by Joost (Canon) on Nov 02, 2007 at 13:47 UTC
That's because it isn't available in the default perl 5.8.8: `> perl -Mstrict -w -e'my $f; print ($f // "something\n")' print (...) interpreted as function at -e line 1. Search pattern not terminated at -e line 1.` [download] "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply] [d/l]
Re^5: complaint: always testing defined() by parv (Parson) on Nov 02, 2007 at 13:55 UTC
Thanks for the clue. I did not realize that the defined-or patch is unconditionally applied these days to Perl 5.8.8 port (as in FreeBSD lang/perl5.8 port).	[reply]