perl Desktop/perl/lib/Statistics/FET_test_complete.pl
1..40
# Running under perl version 5.010000 for linux
# Current time local: Wed Jul 15 11:39:44 2009
# Current time GMT:   Wed Jul 15 10:39:44 2009
# Using Test.pm version 1.25
***888 - Original Statistics::FET - 888***

***
twotailed a-b-c-d
***
not ok 1
# Test 1 got: "1" (Desktop/perl/lib/Statistics/FET_test_complete.pl at line 18)
#   Expected: "(?-xism:^0.378973935)"
#  Desktop/perl/lib/Statistics/FET_test_complete.pl line 18 is: ok( Statistics::FET::fishers_exact(100 , 345 , 150 , 450, 'true', ), qr/^0.378973935/ );
ok 2
not ok 3
# Test 3 got: "1" (Desktop/perl/lib/Statistics/FET_test_complete.pl at line 20)
#   Expected: "(?-xism:^0.000737131)"
#  Desktop/perl/lib/Statistics/FET_test_complete.pl line 20 is: ok( Statistics::FET::fishers_exact(110 , 345 , 250 , 500, 'true', ), qr/^0.000737131/ );
not ok 4
# Test 4 got: "1" (Desktop/perl/lib/Statistics/FET_test_complete.pl at line 21)
#   Expected: "(?-xism:^0.410784065)"
#  Desktop/perl/lib/Statistics/FET_test_complete.pl line 21 is: ok( Statistics::FET::fishers_exact(11 , 34 , 25 , 50, 'true', ), qr/^0.410784065/ );
not ok 5
# Test 5 got: "1" (Desktop/perl/lib/Statistics/FET_test_complete.pl at line 22)
#   Expected: "(?-xism:^0.680962824)"
#  Desktop/perl/lib/Statistics/FET_test_complete.pl line 22 is: ok( Statistics::FET::fishers_exact(11 , 34 , 25 , 60, 'true', ), qr/^0.680962824/ );

***
twotailed (b-a-d-c)
***
ok 6
not ok 7
# Test 7 got: "1" (Desktop/perl/lib/Statistics/FET_test_complete.pl at line 27)
#   Expected: "(?-xism:^0.006634280)"
#  Desktop/perl/lib/Statistics/FET_test_complete.pl line 27 is: ok( Statistics::FET::fishers_exact(345 , 150 , 500 , 150, 'true', ), qr/^0.006634280/ );
ok 8
ok 9
ok 10

***
right tailed (a-b-c-d)
***
ok 11
ok 12
ok 13
ok 14
ok 15

***
left tailed b-a-c-d
***
ok 16
ok 17
ok 18
ok 19
ok 20
***888 - bugfixed Statistics::FishersExactTest - 888***

***
twotailed a-b-c-d
***
ok 21
ok 22
ok 23
ok 24
ok 25

***
twotailed (b-a-d-c)
***
ok 26
ok 27
ok 28
ok 29
ok 30

***
right tailed (a-b-c-d)
***
ok 31
ok 32
ok 33
ok 34
ok 35

***
left tailed b-a-c-d
***
ok 36
ok 37
ok 38
ok 39
ok 40