projects
/
p5sagit/p5-mst-13.2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Re: RFC: bigint et. al exporting PI method? [PATCH]
[p5sagit/p5-mst-13.2.git]
/
lib
/
bignum
/
t
/
bii_e_pi.t
1
#!/usr/bin/perl -w
2
3
###############################################################################
4
# test for e() and PI() exports
5
6
use Test::More;
7
use strict;
8
9
BEGIN
10
{
11
$| = 1;
12
chdir 't' if -d 't';
13
unshift @INC, '../lib';
14
plan tests => 4;
15
}
16
17
use bigint qw/e PI/;
18
19
is (e, "2", 'e');
20
is (PI, "3", 'PI');
21
22
is (e(10), "2", 'e');
23
is (PI(10), "3", 'PI');