Home > Code4Lib, Perl > What is truth?

What is truth?

Not paying close attention to Perl’s definition of truth can sometimes lead to subtle bugs. Consider a simple scalar $x that should contain a string exactly one character wide. If the original value of $x can be undefined and you want to make sure it has a default value of a single space, do not do the following:

$x ||= ' ';

Why not? If $x starts off as ‘0′, a permitted value, this line will change it to ' '. Instead, do this

$x = ' ' unless defined $x;

Remember, 0, '0', '', and undef all evaluate to Perl’s notion of false.

Creative Commons License
The What is truth? by Galen Charlton, unless otherwise expressly stated, is licensed under a Creative Commons Attribution-Share Alike 3.0 United States License.
Categories: Code4Lib, Perl Tags:
  1. September 14th, 2009 at 20:53 | #1

    You can use the defined-or operator in Perl 5.10 instead: $x //= ‘ ‘;

  2. Galen Charlton
    September 14th, 2009 at 21:19 | #2

    @chromatic
    Thanks, I didn’t know that. Alas, the main Perl project I work on has to remain compatible with 5.8 for a while, at least.

  1. No trackbacks yet.