Does anyone have a simple example of how to pass an array of strings to a C function from perl using perl’s XS ?