Barrapunto

Amen.

Incluso en Perl, con su lazy evaluation, quedaría más cuco así:

(user->pp) and ($tr="Zapatero");
(user->psoe) and ($tr="Aznar");

print "Pues me parece que es compatible con el de $tr ...";

Pues es una forma de hacer las cosas más claras. Un compilador listo sabrá simplificarlo y el código puede quedar más claro.

Algunos estándares de progranación sugieren hacer eso.