Select Code to Download

use warnings;
use strict;
...
my $c_libary = new C::DynaLib("./modules/test.o")||die "Failed to load
+: $!\n";
my $c_subroutine = $c_libary->DeclareSub("test", "p");
print &{$c_subroutine}

char* test()
{
   return "WORKS!";
}