||和or有區(qū)別嗎？

myeverthing

學(xué)了倆月perl，越學(xué)越迷糊～
現(xiàn)在對這個也不理解了～～～，書上說:
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 應(yīng)該是等價的啊，可是，為什么下面的輸出不一致？

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

復(fù)制代碼

如果將第一行替換為my $a;然后，我也不知道在$a = $a or 1發(fā)生了什么，
還有一個問題是，能否解釋下$0與__FILE__有什么區(qū)別，我知道$0可以"$0="aa""修改,__FILE__是系統(tǒng)的，
在符號表里，但是有什么區(qū)別呢?怎么會引入這倆？？
還有就是另一個帖子里看到的"//"是什么東西，在哪看到的？
等等還有好多迷糊的地方，總感覺，perl我寫出來，怎么執(zhí)行，就聽天由命了～～
是理解不深入？怎么辦？或者有點資料推薦？

MMMIX

myeverthing 發(fā)表于 2012-03-29 11:32
按這個理解，||與 or 應(yīng)該是等價的啊

它們的優(yōu)先級是不同的。

myeverthing

好吧，我承認沒有完整看完過書，只是用到去查～～，但是，為什么要優(yōu)先級不一樣呢～～

sjdy521

我用括號把優(yōu)先級表示下

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

復(fù)制代碼

jason680

回復(fù) 1# myeverthing

or 與 || 原則上是等價的,但
1. precedence  優(yōu)先權(quán)不同
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 發(fā)表于 2012-03-29 11:32
還有一個問題是，能否解釋下$0與__FILE__有什么區(qū)別，我知道$0可以"$0="aa""修改,__FILE__是系統(tǒng)的，
在符號表里，但是有什么區(qū)別呢?怎么會引入這倆？？

$0 的解釋在 perlvar 中，__FILE__ 的解釋在 perldata 中，自己比較下它們有什么不同吧。

還有就是另一個帖子里看到的"//"是什么東西，在哪看到的？

// 這個在 perlop 中有解釋，想知道就去看看吧。

MMMIX

myeverthing 發(fā)表于 2012-03-29 11:46
好吧，我承認沒有完整看完過書，只是用到去查～～，

除非你只是偶爾用一下，不然的話這種方法是最浪費時間的，效果還很差。

myeverthing

恩，謝謝各位～～～，回復(fù)真及時～
看來還得加強學(xué)習啊～

MMMIX

myeverthing 發(fā)表于 2012-03-29 11:54
恩，謝謝各位～～～，回復(fù)真及時～
看來還得加強學(xué)習啊～

有空還是別泡論壇多看點書吧

大米白面

對優(yōu)先級不確定的時候，可以：

  perl -MO=Deparse,-p foo.pl

做語法檢查，并顯示解釋程序?qū)��?yōu)先級的理解。