Select Code to Download

perl -e 'use Inline C=>q{void greet(){printf("Hello, world\n");}};gree
+t'

use strict;
use warnings;
...

# Cross your fingers and hope for the best!

1..3
ok 1 - The first 500 primes are found from 2 to 3571.
...
#
# I love it when a plan comes together.
#

1..3
ok 1 - The first 500 primes are found from 2 to 3571.
...
# 
# I love it when a plan comes together.
#

use strict;
use warnings;
...
    }
    return sv_2mortal( av );
}

1..4
# Operating system: linux, Perl version: v5.14.2
...
# 
# I love it when a plan comes together.
#