Re^2: Hash element exists/delete

Can you tell me what I am doing wrong:

$ perl -e 'use strict; use warnings; my $one = 1; my $two = 2; if( $on
+e = $two ) { print "True\n"; } else { print "False\n"; } '
True
$
[download]

I get no warnings!

Comment on Re^2: Hash element exists/delete Download Code

Replies are listed 'Best First'.
Re^3: Hash element exists/delete (= in conditional) by LanX (Saint) on Jan 22, 2013 at 10:54 UTC
Because it's valid code, `$two` could be a boolean to be tested and as a side-effect `$one` is set. try `perl -e 'use strict; use warnings; my $one = 1; if( $one = 2 ) { prin +t "True\n"; } else { print "False\n"; } ' Found = in conditional, should be == at -e line 1. True` [download] or `perl -we '$a=1; print (($a = 2) ? "True" : "False");' Found = in conditional, should be == at -e line 1.` [download] cause now it makes less sense. YMMV! Cheers Rolf UPDATE And personally I would be glad if this would cause a warning, too!	[reply] [d/l] [select]
Re^4: Hash element exists/delete (= in conditional) by tmharish (Friar) on Jan 22, 2013 at 11:19 UTC
tmharish sees the light!	[reply]
Re^3: Hash element exists/delete by tobyink (Canon) on Jan 22, 2013 at 10:23 UTC
Only warns in more complex conditionals... `perl -we'if ($z=1 or $z=2) { 1 }'` [download] ... I'm not sure of the exact set of circumstances that triggers it. `package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name`	[reply] [d/l]