view release on metacpan or  search on metacpan

lib/Acme/Pi.pm  view on Meta::CPAN

use strict;
use warnings;
package Acme::Pi; # git description: v3.1415926-16-g35c9c3f
# vim: set ts=8 sts=2 sw=2 tw=100 et :
# ABSTRACT: Mmm, pie
# KEYWORDS: pi π

use utf8;

my $version = atan2(1,1) * 4; $Acme::Pi::VERSION = substr("$version", 0, 16);

use Exporter 5.57 'import';
our @EXPORT = ('$π', '$𝝿', 'π', '𝝿');

use Math::BigFloat;

sub π () { Math::BigFloat->new(1)->batan2(1) * 4 }
sub 𝝿 () { π }

our $π = our $𝝿 = π;

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Acme::Pi - Mmm, pie

=head1 VERSION

version 3.14159265358979

=head1 SYNOPSIS

    use Acme::Pi;

    my $area = $Ï€ * $radius**2;
    my $volume = 4 * π / 3 * $radius**3;

=head1 DESCRIPTION

=for Pod::Coverage 𝝿 π

This distribution was created to celebrate L<Pi Day|http://www.piday.org/> 2014,
as well as to demonstrate yet another example of a pathological C<$VERSION>.

Additionally, it exports two variables: C<$π> and C<$𝝿>,
and two constants, C<π> and C<𝝿>, defined as:

    atan2(1,1) * 4;

This module also defines its own C<$VERSION> as a fixed-point value approximating
Ï€ (using as many digits as is supported on the local machine).
It is intended that version parsers in the toolchain (L<Module::Metadata>,
L<ExtUtils::MakeMaker>'s C<< MM->parse_version >>, L<Parse::PMFile>) should
be capable of statically parsing this package's C<$VERSION>.

=head1 ACKNOWLEDGEMENTS

=for stopwords QA Hackathon

This module was brought to you by the
L<2014 QA Hackathon in Lyon, France|http://act.qa-hackathon.org/qa2014>, as well as
the number L<Ï€|http://en.wikipedia.org/wiki/Pi>.

=head1 AFTERWORD

          3.141592653589793238462643383279
        5028841971693993751058209749445923
       07816406286208998628034825342117067
       9821    48086         5132
      823      06647        09384
     46        09550        58223
     17        25359        4081
               2848         1117
               4502         8410
               2701         9385
              21105        55964
              46229        48954
              9303         81964
              4288         10975
             66593         34461
            284756         48233
            78678          31652        71
           2019091         456485       66
          9234603           48610454326648
         2133936            0726024914127
         3724587             00660631558
         817488               152092096

=head1 SEE ALSO

=over 4

=item *

L<bignum/PI>

=item *

LMath::BigFloat/bpi>

=item *

L<David Golden: Real $VERSIONs on CPAN|http://www.dagolden.com/index.php/2191/real-versions-on-cpan/>