my $pi = 3.14159265358979;

##</code><code>##

 my $pi = 4*atan2(1,1);