C:\Users\HomeAdmin>perl -MO=Deparse
my $x = 1; if($x, 1){ } else{ }
^Z
my $x = 1;
if ($x, 1) {
    ();
}
else {
    ();
}
- syntax OK