的Perl：差异代码

Question

我新的Perl和我试图找到两个片段之间的区别：

$string && $string eq 'foo' 
$string eq 'foo' 

我试了几个条件，但我无法找到的差异。有人可以帮助我找出差异吗？

Answer 1

一个区别是，在第二线可能会产生一个警告信息（使用use warnings;时）如果变量从未被分配一个值：

use warnings; 
use strict; 

my $string; 

if ($string && $string eq 'foo') { 
    print "true1\n"; 
} 
else { 
    print "false1\n"; 
} 

if ($string eq 'foo') { # Get warning 
    print "true2\n"; 
} 
else { 
    print "false2\n"; 
} 

警告消息是：