$ perl -MO=Deparse,-p
print $lines > 1 ? 'plural' : 'singular';
print ($lines > 1) ? 'plural' : 'singular';
__END__
print((($lines > 1) ? 'plural' : 'singular'));
(print(($lines > 1)) ? '???' : '???');
- syntax OK