use constant PI => 3.141592653589793238; #### use constant PI => 4 * atan 1, 1; ## or as i prefer # sub PI() { 4 * atan 1, 1 } #### .