C:\>perl -MO=Deparse -we "$a = 'doit'; print \"hi\n\" if $a eq 'doit'"
$a = 'doit';
print "hi\n" if $a eq 'doit';
-e syntax OK

C:\>perl -MO=Deparse -we "$a = 'doit'; if ($a eq 'doit'){print \"hi\n\"}"
$a = 'doit';
if ($a eq 'doit') {
    print "hi\n";
}
-e syntax OK