La Lógica de Perl

Las reglas básicas para la evaluación de una expresión lógica son:

1. Cualquier cadena es true con la excepción de las cadenas "" y "0".
2. Cualquier número es true excepto el 0.
3. Cualquier referencia es true.
4. Cualquier valor undefined es false.

El operador defined provee el medio para distinguir undef de 0 y de la cadena vacía ''. El operador defined trabaja con cualquier valor. En versiones previas de Perl se requería que el argumento fuera un lvalue, una expresión que se pueda interpretar como la parte izquierda de una asignación.

if (defined(0)) { ... } # TRUE, error en Perl 4

if (defined(()) { ... } # TRUE, error en Perl 4