Subroutines whose names are in all upper case are reserved to the Perl
core, as are modules whose names are in all lower case.

##</code><code>##

SYNOPSIS
           use constant PI    => 4 * atan2(1, 1);
           use constant DEBUG => 0;