I have a similar problem in linking a bunch of routines in a dynamic .so. DynaLoader works for me if I link to ELF (or a.out) when I use the ExtUtils::Embed parameters. This is a great module that tells you how your Perl was compiled:

Use the output of the above command while linking and (hopefully), you'll be fine. You might also fix the problem by linking File::Glob directly:

I hope one of these works for you. Good Luck!

Parts of my Makefile look like this:

CONFIG_PM=-MConfig
PRIVLIB=`$(PERL) $(CONFIG_PM) -e 'print $$Config{privlibexp}'`
EXTUTILS_EMBED = $(PERL) -MExtUtils::Embed

PERL_CFG_CCFLAGS = `$(PERL) $(CONFIG_PM) -e 'print "$$Config{ccflags} 
+$$Config{cccdlflags}"'`
PERL_CFG_ARCHLIB = `$(PERL) $(CONFIG_PM) -e 'print $$Config{archlibexp
+}'`

PERL_CCFLAGS = -I$(PERL_CFG_ARCHLIB)/CORE $(PERL_CFG_CCFLAGS) $(PERL_H
+OOKS) $(TRACE)

STATIC_EXTS=Sybase::OpnSrv

XS_INIT = `$(EXTUTILS_EMBED) -e xsinit -- -std $(PERL_STATIC_EXTS) $(S
+TATIC_EXTS)`

CC=`$(PERL) $(CONFIG_PM) -e 'print $$Config{cc}'`
LD=`$(PERL) $(CONFIG_PM) -e 'print "$$Config{ld}\n"'`

....

SRC=xp_perl.c perlxsi.c ... # other files
OBJS=$(SRC:.c=.o)

perlxsi.c:
    $(XS_INIT)
[download]

#include <EXTERN.h>
#include <perl.h>

EXTERN_C void xs_init (pTHXo);

EXTERN_C void boot_Sybase__OpnSrv (pTHXo_ CV* cv);
EXTERN_C void boot_DynaLoader (pTHXo_ CV* cv);

EXTERN_C void
xs_init(pTHXo)
{
    char *file = __FILE__;
    dXSUB_SYS;

    newXS("Sybase::OpnSrv::bootstrap", boot_Sybase__OpnSrv, file);
    /* DynaLoader is a special case */
    newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
}
[download]

Michael

1) "perl -MExtUtils::Embed -e ccopts -e ldopts" does not work for me when I use it to pass parameters to my cc statement. The cc compiler complains of many unknown options. I took a look at the Config.pm file, and it references the gcc compiler. I don't believe we have that installed on our UNIX server - perhaps the admins loaded a precompiled binary of Perl, rendering ExtUtils useless for me in this fashion?

2) I did use ExtUtils to produce an xsinit.c file, as follows:

perl -MExtUtils::Embed -e xsinit -- -o xsinit.c -std
[download]

cc xsinit.c codeGen.c -o codeGen -L/lib/pa1.1 -L/usr/local/lib -I/usr/
+local/include -I/opt/perl/lib/5.6.1/PA-RISC1.1-t
hread-multi/CORE -L/opt/perl/lib/5.6.1/PA-RISC1.1-thread-multi/auto/Dy
+naLoader/DynaLoader.a -L/opt/perl/lib/5.6.1/PA-RISC1.1-threa
d-multi/CORE -L/opt/perl/lib/5.6.1/PA-RISC1.1-thread-multi/CORE/libper
+l.so -lmalloc -ldld -ldld -lperl -lm -lsec -lnsl -lnm -lpthr
ead -lc -lndir -lcrypt -Dbool=char -DHAS_BOOL
[download]

xsinit.c:
codeGen.c:
/usr/ccs/bin/ld: Unsatisfied symbols:
   boot_DynaLoader (first referenced in xsinit.o) (code)
[download]

3) this problem only seems to arise when I attempt to use glob(). What is it about that function that would result in these errors?

Thanks again good monks- I very much appreciate the help

MatthewFrancis

Here's your error:

-L/opt/perl/lib/5.6.1/PA-RISC1.1-thread-multi/auto/DynaLoader/DynaLoad
+er.a
[download]

This tells the linker to add this directory to the directories to search for files to link.

Remove the -L and you should be fine.

Michael

Embedding Perl into a program will usually only work if Perl and the other program are compiled with the same compiler. Try compiling your own Perl for embedding...

About the dynaloader, I think there was an example how to include it somewhere in the embed PODs, it's just 2 or 3 lines of additional C code. But I cannot find it right now, sorry.

---

_Search, Ask, ^Know

The compile string is now:

cc '-Wl,-E' -I "/usr/local/include" -I "/opt/perl/lib/5.6.1/PA-RISC1.1
+-thread-multi/CORE" -o codeGen xsinit.c codeGen.
c -L/usr/local/lib -L "/opt/perl/lib/5.6.1/PA-RISC1.1-thread-multi/COR
+E" "/opt/perl/lib/5.6.1/PA-RISC1.1-thread-multi/auto/DynaLoa
der/DynaLoader.a" -lperl -lnsl -lm -lc -lcrypt -lsec  -L/usr/local/lib
[download]

Can't load module File::Glob, dynamic loading not available in this pe
+rl.
  (You may need to build a new perl executable which either supports
  dynamic loading or has the File::Glob module statically linked into 
+it.)
Compilation failed in require at search.pl line 8.
BEGIN failed--compilation aborted at search.pl line 8.
Undefined subroutine &main::search_files called at search.pl line 8.
[download]

Thank you all,

MatthewFrancis

OK - now the problem is that the libperl.so/.a is from a build that does not include the dl_open.xs (or whichever implementation is used under HP-UX) module.

Is the C compiler you are using the basic C compiler that comes with HP-UX?

I have a feeling that if that's the case then that C compiler is an old K&R compiler that can't be used to build dynamically loadable modules, etc. Maybe it'd be worth it to download/install gcc? I think there is a site that offers binaries, similar to sunfreeware for Solaris.

Michael

Interesting. I've heard of these ".so" files before, but we don't have any on our server. All we've got is the libperl.a. Does this mean that our current Perl installation is broken/incomplete? If so, I am going to see what I can do about having our Perl reinstalled. For what it's worth, we're using (courtesy of of "perl -v"):

Binary build 633 provided by ActiveState Corp. http://www.ActiveState.
+com
Built 21:04:57 Jun 17 2002
[download]

If it's a binary build, then, perhaps the .so file was never there to begin with. Would you recommend actually building it ourselves, as opposed to working with a precompiled binary?

Yes, I believe the compiler is the standard, no-frills HP-UX compiler.

And - please forgive the remedial nature of my questions - how can I statically link the File::Glob module into my perl executable? What do I have to provide at the command line in order to make this happen?

Thank you again, for the help

MatthewFrancis