1..4
# Operating system: linux, Perl version: v5.14.2
# 
# Constant TOP is 200000
# Constant TIME is 10
# 
ok 1 - basic_perl(3571): The first 500 primes are found from 2 to 3571.
ok 2 - external_cpp(TOP): Same results as basic_perl(TOP).
ok 3 - inline_c_list(TOP): Same results as basic_perl(TOP).
ok 4 - inline_c_aref(TOP): Same result as basic_perl(TOP).
# 
# Comparing  basic_perl(), external_cpp(), inline_c_list(), inline_c_aref()
# for 10 seconds searching 200000 integers.
# 
                Rate    basic_perl  external_cpp inline_c_list inline_c_aref
basic_perl    1.64/s            --          -91%          -97%          -97%
external_cpp  17.6/s          977%            --          -67%          -67%
inline_c_list 53.0/s         3138%          201%            --           -2%
inline_c_aref 54.1/s         3202%          207%            2%            --
# 
# I love it when a plan comes together.
#