Perl constants. (That's probably not the right way to do that, but OK for now)