Dear Sir,

I am writing to thank you for your letter and say,

On Tue, Feb 10, 2004 at 05:38:33PM +0000, Nick Ing-Simmons wrote:
> Stanley Hopcroft <[EMAIL PROTECTED]> writes:
>  ... blah blah blah 
> >The difference between code that compiles (and runs) on the 5.8.1 system
> >is _only_ the name of the Perl interpreter variable,
> 
> Which as you have discovered is important.
> If your perl is configured for threads or multiplicity 
> (and yours is both) there must be a 
> 
>    PerlInterpreter *my_perl
> 
> in scope before you call almost any of perl's internals.
> Which line is 116 ?
>

PL_perl_destruct_level = 0;  


( ...

fgets(plugin_output,sizeof(plugin_output)-1,fp);
   109                          
plugin_output[sizeof(plugin_output)-1]='\x0';
   110                          fclose(fp);
   111                          unlink(tmpfname);    
   112                          printf("embedded perl plugin return 
code: %d. plugin output: %s\n",pclose_result, plugin_output);
   113                  }
   114          }
   115          
   116          PL_perl_destruct_level = 0;
   117          perl_destruct(perl);
   118          perl_free(perl);
   119          exit(exitstatus);
   120  }
)


> And can we see perl -V output for the perl you used there.

[EMAIL PROTECTED] contrib]$ perl -V
Summary of my perl5 (revision 5.0 version 8 subversion 1) configuration:
  Platform:
    osname=linux, osvers=2.4.18-23mdksmp, 
archname=i386-linux-thread-multi
    uname='linux hp6.mandrakesoft.com 2.4.18-23mdksmp #1 smp fri aug 2 
12:31:40 cest 2002 i686 unknown unknown gnulinux '
    config_args='-des -Dinc_version_list=5.8.0/i386-linux-thread-multi 
5.8.0 5.6.1 5.6.0 -Darchname=i386-linux -Dcc=gcc -Doptimize=-O2 
-fomit-frame-pointer -pipe -march=i586 -mcpu=pentiumpro  -Dprefix=/usr 
-Dvendorprefix=/usr -Dsiteprefix=/usr -Dman3ext=3pm -Dcf_by=MandrakeSoft 
-Dmyhostname=localhost [EMAIL PROTECTED] -Dd_dosuid -Ud_csh 
-Duseshrplib -Dusethreads'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=define use5005threads=undef useithreads=define 
usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS 
-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE 
-D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm',
    optimize='-O2 -fomit-frame-pointer -pipe -march=i586 
-mcpu=pentiumpro ',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS 
-fno-strict-aliasing -I/usr/local/include -I/usr/include/gdbm'
    ccversion='', gccversion='3.3.1 (Mandrake Linux 9.2 3.3.1-1mdk)', 
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='gcc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lndbm -lgdbm -ldl -lm -lcrypt -lutil -lpthread -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=/lib/libc-2.3.2.so, so=so, useshrplib=true, libperl=libperl.so
    gnulibc_version='2.3.2'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic 
-Wl,-rpath,/usr/lib/perl5/5.8.1/i386-linux-thread-multi/CORE'
    cccdlflags='-fPIC', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: MULTIPLICITY USE_ITHREADS USE_LARGE_FILES 
PERL_IMPLICIT_CONTEXT
  Locally applied patches:
        RC4
  Built under linux
  Compiled at Sep  1 2003 17:29:01
  @INC:
    /usr/lib/perl5/5.8.1/i386-linux-thread-multi
    /usr/lib/perl5/5.8.1
    /usr/lib/perl5/site_perl/5.8.1/i386-linux-thread-multi
    /usr/lib/perl5/site_perl/5.8.1
    /usr/lib/perl5/site_perl/5.6.1
    /usr/lib/perl5/site_perl
    /usr/lib/perl5/vendor_perl/5.8.1/i386-linux-thread-multi
    /usr/lib/perl5/vendor_perl/5.8.1
    /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi
    /usr/lib/perl5/vendor_perl/5.8.0
    /usr/lib/perl5/vendor_perl
    .
[EMAIL PROTECTED] contrib]$

FWIW, there don't appear to be any notes in the perlembed docs about 
this (I would have missed them if they'd been there).

Thank you very much for explaining this and sorry for the noise.

Yours sincerely.

-- 
------------------------------------------------------------------------
Stanley Hopcroft
------------------------------------------------------------------------

'...No man is an island, entire of itself; every man is a piece of the
continent, a part of the main. If a clod be washed away by the sea,
Europe is the less, as well as if a promontory were, as well as if a
manor of thy friend's or of thine own were. Any man's death diminishes
me, because I am involved in mankind; and therefore never send to know
for whom the bell tolls; it tolls for thee...'

from Meditation 17, J Donne.

Reply via email to