% perl -MO=Deparse -e'if($x1 eq $y1 && $x2 eq $y2){}' if ($x1 eq $y1 and $x2 eq $y2) { (); } % perl -MO=Deparse -e'if(($x1 eq $y1) and ($x2 eq $y2)){}' if ($x1 eq $y1 and $x2 eq $y2) { (); }