#!/usr/bin/perl -w use lib '/usr/lib/perl5/vendor_perl/5.8.0'; use lib '/users/nirf/perlTrials/cpanModulesInstallation/lib/perl5/site_perl/5.8.0'; use lib '/users/nirf/perlTrials/cpanModulesInstallationInline/lib/perl5/site_perl/5.8.5'; #use lib '/users/nirf/perlTrials/cpanModulesInstallationParseRecDescent/lib/perl5/site_perl/5.8.5'; #use Inline Config => LIBS => '-L/users/nirf/perlTrials/inlineExample', LIBS => '-lmain'; #use Inline Config => LIBS => '-L/users/nirf/perlTrials/inlineExample -lmain'; use Inline CPP => Config => INC => '-l/users/nirf/perlTrials/inlineExample'; use Inline CPP => Config => MYEXTLIB => '/users/nirf/perlTrials/inlineExample/libmain.so'; use Inline CPP; sub func { add(1,1); } print "9 + 16 = ", add(9, 16), "\n"; __END__ __CPP__ #include "main.h" char GlobalArr[13] = {'G','l','o','b','a','l',' ','a','r','r','a','y','\0',}; MyClass myGlobalInstance(GlobalArr) ; int add(int x, int y) { char arr[7]={'i','n',' ','a','d','d','\0'}; MyClass mc(arr); myGlobalInstance.wow(); return x + y; }