2004.02.01, 11:10:01.437996, [Libertel_O2_055] connected: 212.155.169.123

##</code><code>##

Can't load '/usr/local/lib/perl5/site_perl/5.8.0/i686-linux/auto/IPC/ShareLite/ShareLite.so' for module IPC::ShareLite: /usr/local/lib/perl5/site_perl/5.8.0/i686-linux/auto/IPC/ShareLite/ShareLite.so: undefined symbol: PL_sv_undef at /usr/local/lib/perl5/5.8.0/i686-linux/DynaLoader.pm line 229.
 at sevexit.pl line 7
Compilation failed in require at sevexit.pl line 7.

##</code><code>##

Sevexit.pl :

package MOBILEWAY::sevexit;

#sevexit.pl

print "heelo\n";

sub test {

                my @prra = @_;
                use IPC::ShareLite;
        print  "hello there my pid is $$\n";

                my $i=0;

                foreach my $param(@prra) {

                $i++;

                print "Param $i = $param\n";

                                }

                close FILE;
                return ("test");
}

1;

##</code><code>##

the xs glue

/* sevexit.c */

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

EXTERN_C void xs_init (pTHX);
EXTERN_C void boot_DynaLoader (pTHX_ CV* cv);
EXTERN_C void

xs_init(pTHX)

{
        char *file = __FILE__;
        dXSUB_SYS;

        /* DynaLoader is a special case */

        newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);

}

##</code><code>##

cc -shared -o sevexit.o sevexit.c `perl -MExtUtils::Embed -e ccopts -e ldopts`

##</code><code>##

-rdynamic  -L/usr/local/lib /usr/local/lib/perl5/5.8.0/i686-linux/auto/DynaLoader/DynaLoader.a -L/usr/local/lib/perl5/5.8.0/i686-linux/CORE -lperl -lnsl -ldl -lm -lc -lcrypt -lutil

 -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64  -I/usr/local/lib/perl5/5.8.0/i686-linux/CORE

##</code><code>##

Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration:

  Platform:

    osname=linux, osvers=2.4.18-64gb-smp, archname=i686-linux
    uname='linux steroide1 2.4.18-64gb-smp #1 smp wed mar 27 13:58:12 utc 2002 i686 unknown '
    config_args='-de'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef

  Compiler:

    cc='cc', ccflags ='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O3',
    cppflags='-fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='2.95.3 20010315 (SuSE)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define

  Linker and Libraries:

    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -ldl -lm -lc -lcrypt -lutil
    perllibs=-lnsl -ldl -lm -lc -lcrypt -lutil
    libc=, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.2.5'

  Dynamic Linking:

    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
 

Characteristics of this binary (from libperl): 
  Compile-time options: USE_LARGE_FILES
  Built under linux
  Compiled at Jul 26 2003 20:50:03
  @INC:
    /usr/local/lib/perl5/5.8.0/i686-linux
    /usr/local/lib/perl5/5.8.0
    /usr/local/lib/perl5/site_perl/5.8.0/i686-linux
    /usr/local/lib/perl5/site_perl/5.8.0
    /usr/local/lib/perl5/site_perl