perl -e ' $a = 5; $b = 5; $c = 5; if ( ($a == $b) == $c ) { print "They are the same\n"; } else { print "They are not the same\n"; } ' #### if ( $a == $b and $a == $c ) { print "true\n"; } else { print "not true"; }