Select Code to Download

use strict;
use Inline (
...
int add(int x, int y) {
    return x + y;
}

/usr/bin/perl /usr/share/perl/5.8/ExtUtils/xsubpp  -typemap /usr/share
+/perl/5.8/ExtUtils/typemap   inline_C_test_pl_6d69.xs > inline_C_test
+_pl_6d69.xsc && mv inline_C_test_pl_6d69.xsc inline_C_test_pl_6d69.c
cc -c  -I/home/phil/jobs/perl -D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAV
+E_PIDS -DDEBIAN -fno-strict-aliasing -pipe -I/usr/local/include -D_LA
+RGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O2   -DVERSION=\"0.00\" -DXS_V
+ERSION=\"0.00\" -fPIC "-I/usr/lib/perl/5.8/CORE"   inline_C_test_pl_6
+d69.c
...

 at inline_C_test.pl line 0
INIT failed--call queue aborted.