Why is G-wan perl embedded c script slower than perl script itself?

Question

Tried running the below code using Inline C, the speed was 10reqs/s compared with pure perl hello world at 110reqs/s. What's the problem?

#!/usr/bin/perl -w
use Inline (Config => DIRECTORY => '/home/example/.Inline',);
use Inline 'C';


greet();
exit 200;


__END__

__C__

void greet() {
printf("Hello, world\n");
}

Answer 1

Because your script doesn't do anything useful. Even ignoring the first run (where it has to compile the C source), the amount of work that Inline::C does to checksum the C source, check that it's already been compiled and dynamically link the function is way more work than just printing "Hello world". If you compared a Perl version and an Inline::C version of a function that did some fairly expensive numeric computation, you would see a very different result.