||和or有区别吗？

myeverthing

学了俩月perl，越学越迷糊～
现在对这个也不理解了～～～，书上说:
Table 1-1. Logical Operators

$a && $b	And	$a if $a is false, $b otherwise
$a || $b	Or	$a if $a is true, $b otherwise
$a and $b	And	$a if $a is false, $b otherwise
$a or $b	Or	$a if $a is true, $b otherwise

还有下面的一段话
“
Like C, Perl provides the && (logical AND) and || (logical OR) operators. They
evaluate from left to right (with && having slightly higher precedence than ||) test-
ing the truth of the statement. These operators are known as short-circuit opera-
tors because they determine the truth of the statement by evaluating the fewest
number of operands possible. For example, if the left operand of an && operator is
false, the right operand is never evaluated because the result of the operator is
false regardless of the value of the right operand.
”
按这个理解，||与 or 应该是等价的啊，可是，为什么下面的输出不一致？

1. my $a = 0;
   
2. $a = $a or 1;
   
3. print $a;
   
4. $a = $a || 1;
   
5. print $a;
   

复制代码

如果将第一行替换为my $a;然后，我也不知道在$a = $a or 1发生了什么，
还有一个问题是，能否解释下$0与__FILE__有什么区别，我知道$0可以"$0="aa""修改,__FILE__是系统的，
在符号表里，但是有什么区别呢?怎么会引入这俩？？
还有就是另一个帖子里看到的"//"是什么东西，在哪看到的？
等等还有好多迷糊的地方，总感觉，perl我写出来，怎么执行，就听天由命了～～
是理解不深入？怎么办？或者有点资料推荐？

MMMIX

myeverthing 发表于 2012-03-29 11:32
按这个理解，||与 or 应该是等价的啊

它们的优先级是不同的。

myeverthing

好吧，我承认没有完整看完过书，只是用到去查～～，但是，为什么要优先级不一样呢～～

sjdy521

我用括号把优先级表示下

1. （$a = $a ）or 1;
   
2. $a = （$a || 1）;

复制代码

jason680

回复 1# myeverthing

or 与 || 原则上是等价的,但
1. precedence  优先权不同
2. $a为0时,若0就是所要之值...,用 // 来解决

$ perldoc perlop
           ...
           left        &
           left        | ^
           left        &&
           left        || //
           nonassoc    ..  ...
           right       ?:
           right       = += -= *= etc.
           left        , =>
           nonassoc    list operators (rightward)
           right       not
           left        and
           left        or xor
           ...
   C-style Logical Defined-Or
       Although it has no direct equivalent in C, Perl's "//" operator is
       related to its C-style or.  In fact, it's exactly the same as "||",
       except that it tests the left hand side's definedness instead of its
       truth.  Thus, "$a // $b" is similar to "defined($a) || $b" (except that
       it returns the value of $a rather than the value of "defined($a)") and
       is exactly equivalent to "defined($a) ? $a : $b". This is very useful
       for providing default values for variables.  If you actually want to
       test if at least one of $a and $b is defined, use "defined($a // $b)".

       The "||", "//" and "&&" operators return the last value evaluated
       (unlike C's "||" and "&&", which return 0 or 1). Thus, a reasonably
       portable way to find out the home directory might be:

           $home = $ENV{'HOME'} // $ENV{'LOGDIR'} //
               (getpwuid($<))[7] // die "You're homeless!\n";

MMMIX

myeverthing 发表于 2012-03-29 11:32
还有一个问题是，能否解释下$0与__FILE__有什么区别，我知道$0可以"$0="aa""修改,__FILE__是系统的，
在符号表里，但是有什么区别呢?怎么会引入这俩？？

$0 的解释在 perlvar 中，__FILE__ 的解释在 perldata 中，自己比较下它们有什么不同吧。

还有就是另一个帖子里看到的"//"是什么东西，在哪看到的？

// 这个在 perlop 中有解释，想知道就去看看吧。

MMMIX

myeverthing 发表于 2012-03-29 11:46
好吧，我承认没有完整看完过书，只是用到去查～～，

除非你只是偶尔用一下，不然的话这种方法是最浪费时间的，效果还很差。

myeverthing

恩，谢谢各位～～～，回复真及时～
看来还得加强学习啊～

MMMIX

myeverthing 发表于 2012-03-29 11:54
恩，谢谢各位～～～，回复真及时～
看来还得加强学习啊～

有空还是别泡论坛多看点书吧

大米白面

对优先级不确定的时候，可以：

  perl -MO=Deparse,-p foo.pl

做语法检查，并显示解释程序对优先级的理解。