constant – Perl pragma to declare constants USAGE use constant PI => 4 * atan2(1, 1); use constant DEBUG => 0;
print “Pi [...]