and vs &&

marcussen has asked for the wisdom of the Perl Monks concerning the following question:

This passed my desk today...

$ perl -e 'my $a=(1 == 1) && (0);print "$a\n";'
0
$ perl -e 'my $a=(1 == 1) and (0);print "$a\n";'
1
$ perl -e 'my $a=((1 == 1) and (0));print "$a\n";'
0
[download]

I must admit that I would have expected the result to be the same, yet it appears that the binary and forgets the boundaries of it's condition and always evaluates to true if the left hand condition is true while not encapsulated by parantheses to mark the boundary. Is my interpretation of perldoc perlop wrong or do I need more coolaid?

Confucius says kill mosquito unless cannon

Comment on and vs && Download Code

Replies are listed 'Best First'.
Re: and vs && by kennethk (Abbot) on Feb 12, 2009 at 00:59 UTC
Check out Burned by precedence rules. The issue is that the `and` operator has lower precedence than the assignment operator. It says as much in operator precedence.	[reply] [d/l]
Re: and vs && by JavaFan (Canon) on Feb 12, 2009 at 01:17 UTC
`$ perl -we 'my $a=(1 == 1) and (0);print "$a\n";' Found = in conditional, should be == at -e line 1. 1` [download] Should be a hint...	[reply] [d/l]
Re: and vs && by ikegami (Patriarch) on Feb 12, 2009 at 03:31 UTC
`>perl -MO=Deparse,-p -e"my $a = $b and $c" ((my $a = $b) and $c); -e syntax OK` [download]	[reply] [d/l]
Re: and vs && by trwww (Priest) on Feb 12, 2009 at 03:53 UTC
Hello, It is possible to write relatively obfuscated Perl. But perl will will be happy do de-obfuscate it for you if you ask it to: `$ perl -e 'my $a=(1 == 1) && (0);print "$a\n";' 0 $ perl -MO=Deparse -e 'my $a=(1 == 1) && (0);print "$a\n";' my $a = 0; print "$a\n"; -e syntax OK $ perl -e 'my $a=(1 == 1) and (0);print "$a\n";' 1 $ perl -MO=Deparse -e 'my $a=(1 == 1) and (0);print "$a\n";' '???' if my $a = 1; print "$a\n"; -e syntax OK` [download] regards,	[reply] [d/l]
Re: and vs && by marcussen (Pilgrim) on Feb 12, 2009 at 01:00 UTC
To eliminate doubts about the right hand condition evaluating to an anonymous list with one entry of the value 0, which evaluates to true I would like to append the following; `$ perl -e 'my $a=(1 == 1) and 0;print "$a\n";' 1` [download] Confucius says kill mosquito unless cannon	[reply] [d/l]
Re^2: and vs && by chromatic (Archbishop) on Feb 12, 2009 at 07:35 UTC
To eliminate doubts about the right hand condition evaluating to an anonymous list with one entry of the value 0.... Where do you see a list in that code?	[reply]
Re^3: and vs && by marcussen (Pilgrim) on Feb 13, 2009 at 00:47 UTC
I never saw a list, but as parentheses are also used to enforce list context someone might percieve (0) to be 0 in list context. I hope that explains my cryptic clarification :) Confucius says kill mosquito unless cannon	[reply]
Re: and vs && by imrags (Monk) on Feb 12, 2009 at 08:34 UTC
when i type this `perl -e 'my $a=(1 == 1) && (0);print "$a\n";'` [download] it gives me error: `print was unexpected at this time.` [download] I'm using perl 5.10.0 (activestate) on WinXP :( (yes, i use Windows with perl) Raghu	[reply] [d/l] [select]
Re^2: and vs && by ikegami (Patriarch) on Feb 12, 2009 at 13:08 UTC
your shell uses double-quotes to quote arguments.	[reply]