Select Code to Download

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