Compared to jwkrahn's simple and clear version (with one print), this "improvement" (with print occurring twice) is a violation of the DRY principle.

See also Perl Best Practices: Chapter 6 (Control Structures), Tabular Ternaries; and Chapter 2 (Code Layout), Ternaries.