[10567] in Perl-Users-Digest
Perl-Users Digest, Issue: 4159 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Nov 5 13:08:40 1998
Date: Thu, 5 Nov 98 10:02:52 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 5 Nov 1998 Volume: 8 Number: 4159
Today's topics:
Problems building to load dynamic extensions (Scott Smith)
Re: Reference Safety (Kevin Reid)
reg. expr question. <kjetil@balder.no>
Re: reg. expr question. (Greg Bacon)
Re: reg. expr question. <Allan@due.net>
Re: reg. expr question. <kjetil@balder.no>
Re: reg. expr question. <kjetil@balder.no>
Re: reg. expr question. <r28629@email.sps.mot.com>
Re: replacing inbetween 2 keywords droby@copyright.com
simple scalar question pjgeer@hotmail.com
Re: simple scalar question (Brand Hilton)
Re: Substitutions <r28629@email.sps.mot.com>
Re: system(". $file"); #odd result! ronald_f@my-dejanews.com
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 05 Nov 1998 17:56:59 GMT
From: scottsmi@blue.seas.upenn.edu (Scott Smith)
Subject: Problems building to load dynamic extensions
Message-Id: <SCOTTSMI.98Nov5125659@blue.seas.upenn.edu>
I had compiled perl version 5.005_02 and tested it with make test. Most
of the tests worked, but it seems that everything that loads an
extension fails. In addition, a few other tests return a message that
they can't find symbol PL_.... and others.
I am running Linux, Redhat 4.0, kernel 2.0.32, gcc 2.7.2. Would this
log from the failed tests give any indication of what I should check
for?
Thanks,
Scott Smith
op/goto_xs......./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
skipping test on this platform
pragma/locale..../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'Perl_no_security'
./perl: can't resolve symbol 'PL_numeric_local'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_siggv'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'Perl_sighandler'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'Perl_sig_name'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_tainting'
ok
All tests successful.
u=0.31 s=0.08 cu=3.18 cs=0.31 scripts=1 tests=98
lib/abbrev.........ok
lib/anydbm........../perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/Fcntl/Fcntl.so' for module Fcntl: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/anydbm.t line 11
BEGIN failed--compilation aborted at lib/anydbm.t line 11.
FAILED at test 0
lib/autoloader.....ok
lib/basename.......ok
lib/bigint.........ok
lib/bigintpm.......ok
lib/cgi-form.......ok
lib/cgi-function...ok
lib/cgi-html.......ok
lib/cgi-request....ok
lib/checktree......ok
lib/complex........ok
lib/db-btree......../perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_tmps_ix'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_tmps_floor'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/DB_File/DB_File.so' for module DB_File: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/db-btree.t line 12
BEGIN failed--compilation aborted at lib/db-btree.t line 12.
FAILED at test 0
lib/db-hash........./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_tmps_ix'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_tmps_floor'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/DB_File/DB_File.so' for module DB_File: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/db-hash.t line 12
BEGIN failed--compilation aborted at lib/db-hash.t line 12.
FAILED at test 0
lib/db-recno......../perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_tmps_ix'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_tmps_floor'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/DB_File/DB_File.so' for module DB_File: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/db-recno.t line 12
BEGIN failed--compilation aborted at lib/db-recno.t line 12.
FAILED at test 0
lib/dirhand........ok
lib/dosglob........ok
lib/dumper-ovl....../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_tmps_ix'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_errgv'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_tmps_floor'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/Data/Dumper/Dumper.so' for module Data::Dumper: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/dumper-ovl.t line 8
BEGIN failed--compilation aborted at lib/dumper-ovl.t line 8.
FAILED at test 0
lib/dumper........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_tmps_ix'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_errgv'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_tmps_floor'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/Data/Dumper/Dumper.so' for module Data::Dumper: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/dumper.t line 11
BEGIN failed--compilation aborted at lib/dumper.t line 11.
FAILED at test 0
lib/english........ok
lib/env............ok
lib/errno..........ok
lib/fields.........ok
lib/filecache......ok
lib/filecopy......../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at ../lib/IO/File.pm line 111.
FAILED at test 6
lib/filefind.......ok
lib/filehand......../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at ../lib/IO/File.pm line 111.
BEGIN failed--compilation aborted at lib/filehand.t line 13.
FAILED at test 0
lib/filepath.......ok
lib/filespec.......ok
lib/findbin........ok
lib/gdbm............/perl: can't resolve symbol 'Perl_croak'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/GDBM_File/GDBM_File.so' for module GDBM_File: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/gdbm.t line 14
BEGIN failed--compilation aborted at lib/gdbm.t line 14.
FAILED at test 0
lib/getopt.........ok
lib/h2ph...........ok
lib/hostname.......ok
lib/io_dup........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at lib/io_dup.t line 21.
FAILED at test 0
lib/io_pipe........./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Pipe.pm line 11.
BEGIN failed--compilation aborted at lib/io_pipe.t line 23.
FAILED at test 0
lib/io_sel.........ok
lib/io_sock........./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Socket.pm line 117.
BEGIN failed--compilation aborted at lib/io_sock.t line 27.
FAILED at test 0
lib/io_taint......../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at ../lib/IO/File.pm line 111.
BEGIN failed--compilation aborted at lib/io_taint.t line 24.
FAILED at test 0
lib/io_tell........./perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at ../lib/IO/File.pm line 111.
BEGIN failed--compilation aborted at lib/io_tell.t line 27.
FAILED at test 0
lib/io_udp........../perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/Socket/Socket.so' for module Socket: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/io_udp.t line 27
BEGIN failed--compilation aborted at lib/io_udp.t line 27.
FAILED at test 0
lib/io_xs.........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at ../lib/IO/Seekable.pm line 50.
BEGIN failed--compilation aborted at ../lib/IO/File.pm line 111.
BEGIN failed--compilation aborted at lib/io_xs.t line 21.
FAILED at test 0
lib/ipc_sysv......../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IPC/SysV/SysV.so' for module IPC::SysV: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IPC/SysV.pm line 54
BEGIN failed--compilation aborted at lib/ipc_sysv.t line 21.
FAILED at test 0
lib/ndbm............/perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/Fcntl/Fcntl.so' for module Fcntl: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/ndbm.t line 17
BEGIN failed--compilation aborted at lib/ndbm.t line 17.
FAILED at test 0
lib/odbm...........skipping test on this platform
lib/opcode........../perl: can't resolve symbol 'PL_endav'
./perl: can't resolve symbol 'PL_op_mask'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_defstash'
./perl: can't resolve symbol 'Perl_warn'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_maxo'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/Opcode/Opcode.so' for module Opcode: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/opcode.t line 15
BEGIN failed--compilation aborted at lib/opcode.t line 19.
FAILED at test 0
lib/open2.........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at lib/open2.t line 19.
FAILED at test 0
lib/open3.........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/IO/IO.so' for module IO: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at ../lib/IO/Handle.pm line 248
BEGIN failed--compilation aborted at lib/open3.t line 19.
FAILED at test 0
lib/ops............./perl: can't resolve symbol 'PL_endav'
./perl: can't resolve symbol 'PL_op_mask'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_defstash'
./perl: can't resolve symbol 'Perl_warn'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_maxo'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
FAILED at test 1
lib/parsewords.....ok
lib/ph............../perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
ok
lib/posix.........../perl: can't resolve symbol 'PL_sv_undef'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'Perl_no_security'
./perl: can't resolve symbol 'PL_numeric_local'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_siggv'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'Perl_sighandler'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'Perl_sig_name'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_tainting'
Can't load '../lib/auto/POSIX/POSIX.so' for module POSIX: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/posix.t line 13
BEGIN failed--compilation aborted at lib/posix.t line 13.
FAILED at test 0
lib/safe1.........../perl: can't resolve symbol 'PL_endav'
./perl: can't resolve symbol 'PL_op_mask'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_defstash'
./perl: can't resolve symbol 'Perl_warn'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_maxo'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/Opcode/Opcode.so' for module Opcode: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/safe1.t line 20
BEGIN failed--compilation aborted at lib/safe1.t line 21.
FAILED at test 0
lib/safe2.........../perl: can't resolve symbol 'PL_endav'
./perl: can't resolve symbol 'PL_op_mask'
./perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_defstash'
./perl: can't resolve symbol 'Perl_warn'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_markstack_max'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_maxo'
./perl: can't resolve symbol 'PL_stack_sp'
./perl: can't resolve symbol 'PL_scopestack_ix'
./perl: can't resolve symbol 'PL_op'
./perl: can't resolve symbol 'PL_debug'
Can't load '../lib/auto/Opcode/Opcode.so' for module Opcode: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/safe2.t line 20
BEGIN failed--compilation aborted at lib/safe2.t line 21.
FAILED at test 0
lib/sdbm............/perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/Fcntl/Fcntl.so' for module Fcntl: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/sdbm.t line 16
BEGIN failed--compilation aborted at lib/sdbm.t line 16.
FAILED at test 0
lib/searchdict.....ok
lib/selectsaver....ok
lib/socket........../perl: can't resolve symbol 'PL_stack_max'
./perl: can't resolve symbol 'PL_markstack_ptr'
./perl: can't resolve symbol 'PL_na'
./perl: can't resolve symbol 'PL_sv_yes'
./perl: can't resolve symbol 'PL_stack_base'
./perl: can't resolve symbol 'PL_stack_sp'
Can't load '../lib/auto/Socket/Socket.so' for module Socket: Unable to resolve symbol at ../lib/DynaLoader.pm line 168.
at lib/socket.t line 14
BEGIN failed--compilation aborted at lib/socket.t line 14.
FAILED at test 0
lib/soundex........ok
lib/symbol.........ok
lib/texttabs.......ok
lib/textwrap.......ok
lib/thread.........skipping test on this platform
lib/tie-push.......ok
lib/tie-stdarray...ok
lib/tie-stdpush....ok
lib/timelocal......ok
lib/trig...........ok
Failed 27 test scripts out of 68, 57.35% okay.
### Since not all tests were successful, you may want to run some
### of them individually and examine any diagnostic messages they
### produce. See the INSTALL document's section on "make test".
### If you are testing the compiler, then ignore this message
### and run
### ./perl harness
### in the directory ./t.
u=2.26 s=1.58 cu=151.66 cs=10.21 scripts=41 tests=2017
------------------------------
Date: Thu, 5 Nov 1998 00:31:11 -0500
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: Reference Safety
Message-Id: <1dhxb28.s2raau4utajsN@slip-32-100-246-79.ny.us.ibm.net>
Jerome O'Neil <jeromeo@atrieva.com> wrote:
> What if, however, I had done this:
>
> sub useahashref(\%){
> my($hashref) = shift;
> }
>
> What are the implications for $hashref now?
$hashref is another reference to the hash. The referece count of
%$hashref will have gone up.
> Are there any special considerations for @_?
Not that I know of, except that modifying its elements changes the
original values:
#!perl -w
sub inc {
$_[0]++;
}
$x = 1;
inc($x);
print "$x\n";
# This should fail:
inc(1);
__END__
--
Kevin Reid. | Macintosh.
"I'm me." | Think different.
------------------------------
Date: Thu, 05 Nov 1998 14:59:54 +0100
From: Kjetil Svendsberget <kjetil@balder.no>
Subject: reg. expr question.
Message-Id: <3641AF5A.90716D05@balder.no>
i have a string which looks like one these:
a. $dest_dir = 'f:'
b. $dest_dir = 'f:\'
c. $dest_dir = 'f:\a
d. $dest_dir = 'f:\a\
e. $dest_dir = 'f:\a\b\c\d';
f. $dest_dir = 'f:\a\b\c\d\';
what i want to get hold of is this:
a: gives nothing
b: gives nothing
c: gives 'a'
d: gives 'a'
e: gives 'd'
f: gives 'd'
any suggestions?
------------------------------
Date: 5 Nov 1998 14:29:32 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: reg. expr question.
Message-Id: <71scoc$p3k$1@info.uah.edu>
In article <3641AF5A.90716D05@balder.no>,
Kjetil Svendsberget <kjetil@balder.no> writes:
: i have a string which looks like one these:
: a. $dest_dir = 'f:'
: b. $dest_dir = 'f:\'
: c. $dest_dir = 'f:\a
: d. $dest_dir = 'f:\a\
: e. $dest_dir = 'f:\a\b\c\d';
: f. $dest_dir = 'f:\a\b\c\d\';
:
: what i want to get hold of is this:
: a: gives nothing
: b: gives nothing
: c: gives 'a'
: d: gives 'a'
: e: gives 'd'
: f: gives 'd'
#! /usr/bin/perl -w
for (qw( f: f:\ f:\a f:\a\ f:\a\b\c\d f:\a\b\c\d\ )) {
next unless /^f:\\ # must have leading f:\
[\w\\]* # skip all backslashes and alphanum
(\w+) # save the last run of alphanums
\\* # followed by any number of backslashes
$/x;
print "$_: `$1'\n";
}
Enjoy,
Greg
--
It has been discovered that C++ provides a remarkable facility for concealing
the trival details of a program--such as where its bugs are.
-- David Keppel
------------------------------
Date: Thu, 5 Nov 1998 10:03:18 -0500
From: "AmD" <Allan@due.net>
Subject: Re: reg. expr question.
Message-Id: <71seff$hsq$1@camel21.mindspring.com>
Kjetil Svendsberget wrote in message <3641AF5A.90716D05@balder.no>...
>
>i have a string which looks like one these:
>a. $dest_dir = 'f:'
>b. $dest_dir = 'f:\'
>c. $dest_dir = 'f:\a
>d. $dest_dir = 'f:\a\
>e. $dest_dir = 'f:\a\b\c\d';
>f. $dest_dir = 'f:\a\b\c\d\';
>
>what i want to get hold of is this:
>a: gives nothing
>b: gives nothing
>c: gives 'a'
>d: gives 'a'
>e: gives 'd'
>f: gives 'd'
>
>any suggestions?
($bit) = $dest_dir =~ /([a-z])\\*$/;
------------------------------
Date: Thu, 05 Nov 1998 16:58:08 +0100
From: Kjetil Svendsberget <kjetil@balder.no>
Subject: Re: reg. expr question.
Message-Id: <3641CB10.E0156884@balder.no>
> >any suggestions?
>
> ($bit) = $dest_dir =~ /([a-z])\\*$/;
works like a charm. Im still dazzled about what it does though. Care to
explain?
Kjetli
------------------------------
Date: Thu, 05 Nov 1998 17:15:17 +0100
From: Kjetil Svendsberget <kjetil@balder.no>
Subject: Re: reg. expr question.
Message-Id: <3641CF15.F61DC3FD@balder.no>
>
> ($bit) = $dest_dir =~ /([a-z])\\*$/;
After a bit of testing: this does not what i want.
What if $dest_dir has 'f:\a\test\' or 'f:\a\TeSt\'
i still want $bit to contain 'test' or 'TeSt'
another perl'er sent me this:
if ($install_dir =~ /\\([^\\]+)\\?$/) {
$install_dir = $1;
}
which works :-) (Thanks Guy Ex. )
------------------------------
Date: Thu, 05 Nov 1998 11:17:33 -0600
From: Tk Soh <r28629@email.sps.mot.com>
Subject: Re: reg. expr question.
Message-Id: <3641DDAD.7255B534@email.sps.mot.com>
Kjetil Svendsberget wrote:
>
> >
> > ($bit) = $dest_dir =~ /([a-z])\\*$/;
>
> After a bit of testing: this does not what i want.
> What if $dest_dir has 'f:\a\test\' or 'f:\a\TeSt\'
>
> i still want $bit to contain 'test' or 'TeSt'
($bit) = $dest_dir =~ /([a-z]+)\\*$/;
^
-tk
------------------------------
Date: Thu, 05 Nov 1998 15:56:42 GMT
From: droby@copyright.com
Subject: Re: replacing inbetween 2 keywords
Message-Id: <71shrp$ese$1@nnrp1.dejanews.com>
In article <1dhzocj.11wl5gm1ijh1a0N@host007-210.seicom.net>,
jwl@_munged_worldmusic.de (Joergen W. Lang) wrote:
> Tom Phoenix <rootbeer@teleport.com> wrote:
>
> > Maybe when Perl 17 introduces the DWIM operator, but not
> > yet.
>
> Carefull with that stuff - look:
>
> % perl -v
>
> This is perl, version 17.006
> I think therefore I am.
> ^^^^^^^^^^^^^^^^^^^^^^^
> Copyright 1987-2006, Larry Wall
>
And then it's just a short step to
%perl -v
This is perl, version 18.003
Copyright 1987-2007, Larry Wall and Perl
--
Don Roby
droby@copyright.com
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Thu, 05 Nov 1998 17:07:13 GMT
From: pjgeer@hotmail.com
Subject: simple scalar question
Message-Id: <71sm00$lhm$1@nnrp1.dejanews.com>
I have a condition that changes from time to time and I bring it in from an
input file and put it into a scalar. I need my perl script to take this
condition and paste it at the * for evaluation:
if ( * ) { ... };
I cant do this:
if ( $cond ) { ... }; #tests if $cond matches 0 or undef
And this doesn't work:
eval { if( $cond ) { ... } };
Please help!
Phil
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 5 Nov 1998 17:36:10 GMT
From: bhilton@tsg.adc.com (Brand Hilton)
Subject: Re: simple scalar question
Message-Id: <71snma$bh116@mercury.adc.com>
In article <71sm00$lhm$1@nnrp1.dejanews.com>, <pjgeer@hotmail.com> wrote:
>I have a condition that changes from time to time and I bring it in from an
>input file and put it into a scalar. I need my perl script to take this
>condition and paste it at the * for evaluation:
>if ( * ) { ... };
>I cant do this:
>if ( $cond ) { ... }; #tests if $cond matches 0 or undef
>And this doesn't work:
>eval { if( $cond ) { ... } };
You need the eval STRING form:
eval " if( $cond ) { ... } ";
--
_____
|/// | Brand Hilton bhilton@adc.com
| ADC| ADC Telecommunications, ATM Transport Division
|_____| Richardson, Texas
------------------------------
Date: Thu, 05 Nov 1998 08:09:21 -0600
From: Tk Soh <r28629@email.sps.mot.com>
To: DesQuite <desquite@hotmail.com>
Subject: Re: Substitutions
Message-Id: <3641B191.5B7AFD65@email.sps.mot.com>
DesQuite wrote:
>
> I'm reading from a file that looks like this:
>
> data1
> data2
> data1
> data3
> data2
>
> Then I use this command to get rid of the all data2's
> @array =~ s/data2//;
@no_data2 = grep !/data2/, @array;
perldoc -f grep for more info.
-tk
------------------------------
Date: Thu, 05 Nov 1998 14:13:09 GMT
From: ronald_f@my-dejanews.com
Subject: Re: system(". $file"); #odd result!
Message-Id: <71sbpl$5pr$1@nnrp1.dejanews.com>
In article <71pugo$j9u@fidoii.cc.Lehigh.EDU>,
"Phil R Lawrence" <prl2@lehigh.edu> wrote:
> When I run . /path/set_env_vars from the shell prompt there is no problem. If
> I run the following perl, however...
>
> test.pl:
> ===========================
> #!/usr/local/bin/perl -w
> use diagnostics;
> use strict;
>
> # Set environmental variables
> my $file = '/path/set_env_vars';
> my $x = system(". $file");
> print "\$x = $x\n";
> ===========================
There are several problems with your approach, the main one being that you
can not set the environment variables that way. Remember that system()
executes its argument in a sub-shell, so any env setting would get lost when
system returns.
If you need to set the environment inside a perl prog, assign to the %ENV
hash, i.e. $ENV{VARIABLE}="value";
Ronald
--
Ronald Fischer <ronald_f@my-dejanews.com>
http://ourworld.compuserve.com/homepages/ronald_fischer/
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 4159
**************************************
