File Coverage

blib/lib/Acme/Pi.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1 3     3   185309 use strict;
  3         40  
  3         77  
2 3     3   15 use warnings;
  3         4  
  3         101  
3             package Acme::Pi; # git description: v3.141592-16-gb99df53
4             # vim: set ts=8 sts=4 sw=4 tw=115 et :
5             # ABSTRACT: Mmm, pie
6             # KEYWORDS: pi π
7              
8 3     3   514 use utf8;
  3         16  
  3         14  
9              
10             my $version = atan2(1,1) * 4; $Acme::Pi::VERSION = substr("$version", 0, 16);
11              
12 3     3   261 use Exporter 5.57 'import';
  3         53  
  3         325  
13             our @EXPORT = ('$π', '$𝝿', 'π', '𝝿');
14             our $π = our $𝝿 = atan2(1,1) * 4;
15 3     3   19 use constant π => atan2(1,1) * 4;
  3         6  
  3         367  
16 3     3   18 use constant 𝝿 => π;
  3         6  
  3         168  
17              
18             1;
19              
20             __END__