Question

I realize that evaluating an array in Perl in a scalar context is useful: it results in a # of elements.

But what is the practical use of being able to evaluate a hash in a scalar context? e.g.

• my $scalar_value = %hash;

• scalar(%hash)

As far as I understand, it produces a string like “3/4” giving some information about the internals of the hash that appears to only be useful for debugging.

Answer 1

It produces a value that can be used as a TRUE/FALSE flag to know if the hash is empty (no keys).

As an example:

if (%hash) {
    print "Hash has elements\n";
} else {
    print "Hash is empty\n";
}

if forces the expression into a scalar context because of its use as a boolean expression.

It’s a very similar concept to using @array in a scalar context to test for emptiness:

if (@array) {
    # NOT empty!
}