Mega Code Archive

 

Categories / Perl / Language Basics

 

Use constant PI

use constant PI                  => 4 * atan2 1, 1; print "Pi = ", PI;