Rather than have a line like this

 my $pi = 3.14159265358979;
[download]

which requires you to choose how many digits of pi you (or your operating system) want, and even may require (for some, at least) that you look up the value of pi, I would suggest that a line like this instead will do the right thing.

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