[15752] in Perl-Users-Digest
Perl-Users Digest, Issue: 3165 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu May 25 18:10:42 2000
Date: Thu, 25 May 2000 15:10:29 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <959292628-v9-i3165@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 25 May 2000 Volume: 9 Number: 3165
Today's topics:
How to manage uploading large file <mmlai@sfu.ca>
Re: How to manage uploading large file <makarand_kulkarni@My-Deja.com>
Re: How to read a float type data? <iltzu@sci.invalid>
Re: how to upload file not using browse button <care227@attglobal.net>
Re: how to upload file not using browse button nobull@mail.com
HPUX 9.x /10.x and Perl 5.6.0 <R.Arlitt@itm.rwth-aachen.de>
Re: HPUX and Perl <raphael.arlitt@mmw.fh-aachen.de>
Re: HPUX and Perl <raphael.arlitt@mmw.fh-aachen.de>
Re: HPUX and Perl <tony_curtis32@yahoo.com>
Re: HPUX and Perl <russ_jones@rac.ray.com>
Re: Interpolation of array in matching (Abigail)
Re: Is anything planned re: Perl error reporting? <iltzu@sci.invalid>
Re: Is anything planned re: Perl error reporting? <rootbeer@redcat.com>
Re: need help on perl library call.. <rootbeer@redcat.com>
Newbie - need to rip images from URL patrickshroads@my-deja.com
Re: Newbie - need to rip images from URL <makarand_kulkarni@My-Deja.com>
newsgroup archives <elynt@exchange.ml.com>
Re: newsgroup archives <lauren_smith13@hotmail.com>
Re: newsgroup archives <godzilla@stomp.stomp.tokyo>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 25 May 2000 19:38:30 GMT
From: Murvin Ming-Wai Lai <mmlai@sfu.ca>
Subject: How to manage uploading large file
Message-Id: <8gjvfm$i1k$2@morgoth.sfu.ca>
Hi all,
I have couple questions/problems want to ask.
1) Now, I'm writing a CGI script in Perl which can upload a file from
client to server. I know that in perl (using CGI.pm), there is a
variable: POST_MAX that can limit the size of data uploading to the
server. However, what I really want to know is that, if I set POST_MAX
equal 100K and another person (as a client) uploads a 200K file, then will
the program stop as soon as it receives 100K of data or it stop after it
recieve all 200K of data?
2) Related to 1), what & how can I do if I only want the first 100K to
be uploaded to the server?
3) Related to 1) again, where the temp data be stored? (if there is,
how can I redirect this to another file?) It is because, right now, I use
this: read (STDIN, $in, $ENV{'CONTENT_LENGTH'}) to get whatever input
from STDIN to variable $in. Then I do some manipulation and save $in to a
file. I notice that this is not a good way to do because if a person
upload a 2MB file, all memory will be used up (since I store everything in
to the variable $in). (I can't imagine if I upload a 100MB file to
server.. gege =D ) That's why I'm looking for a better to retrieve
input and store it to a file efficently.
Thank you for the help.
--
.........................................................................
*>>>>Murvin Lai<<<< >>>>--Muffin--<<<< email: murvin_lai@sfu.ca *
*homepage: http://www.sfu.ca/~mmlai mmlai@sfu.ca *
`````````````````````````````````````````````````````````````````````````
------------------------------
Date: Thu, 25 May 2000 14:21:07 -0700
From: Makarand Kulkarni <makarand_kulkarni@My-Deja.com>
Subject: Re: How to manage uploading large file
Message-Id: <392D9943.DD793E77@My-Deja.com>
> 1) Now, I'm writing a CGI script in Perl which can upload a file from
> client to server. I know that in perl (using CGI.pm), there is a
> variable: POST_MAX that can limit the size of data uploading to the
> server. However, what I really want to know is that, if I set POST_MAX
> equal 100K and another person (as a client) uploads a 200K file, then will
> the program stop as soon as it receives 100K of data or it stop after it
> recieve all 200K of data?
No. A comparison is made between CONTENT_LENGTH and POST_MAX
and iff POST_MAX>=CONTENT_LENGTH does the CGI.pm try to read
the data.
> 2) Related to 1), what & how can I do if I only want the first 100K to
> be uploaded to the server?
You have to change CGI.pm. Or write your own scripts.
> 3) Related to 1) again, where the temp data be stored? (if there is,
> how can I redirect this to another file?)
Change $TempFile::TMPDIRECTORY too affect change in
placement of temp files that CGI.pm creates.
> It is because, right now, I use
> this: read (STDIN, $in, $ENV{'CONTENT_LENGTH'}) to get whatever input
> from STDIN to variable $in. Then I do some manipulation and save $in to a
> file. I notice that this is not a good way to do because if a person
> upload a 2MB file, all memory will be used up (since I store everything in
> to the variable $in).
Leave the upload task to CGI.pm. It uses MultiPartBuffer to
read the input in chunks and not use large chunks of main memory.
I think it reads input in chunk sizes of 4k and writes it to a
temp file immiedately.
--
------------------------------
Date: 25 May 2000 18:53:54 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: How to read a float type data?
Message-Id: <959280403.26040@itz.pp.sci.fi>
In article <MPG.1396fafd7e19e87b98aad8@nntp.hpl.hp.com>, Larry Rosler wrote:
>OK with '+' and other arithmetic operators. Don't assume that it works
>the same way with bit-manipulation operators '&' '|' or '^', though.
Better yet, don't assume anything at all about the bit-manipulation
operators. They are the dark side of DWIM. If you write C in Perl,
you'll get what you expect most of the time. They also work if you
use them exclusively on bitstrings and avoid collapsing the fragile
quantum state by looking at them the wrong way. For anything else..
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Thu, 25 May 2000 14:04:02 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: how to upload file not using browse button
Message-Id: <392D6B12.E1C7F263@attglobal.net>
WWW wrote:
>
> Maybe I did not express clearly before. If
> not post in perl discussion group, where do
> you think I should post on?
>
Since the "browse" button is generated by the browser code,
perhaps a group suited to that type of application would
be better. Or perhaps an HTML group to see if there is
an option to the "upload" field that will cause the browse
button to not display.
Just because you are using Perl as part of the endeavor
doesn't mean Perl is the cause of the situation you wish
to rectify.
------------------------------
Date: 25 May 2000 19:15:58 +0100
From: nobull@mail.com
Subject: Re: how to upload file not using browse button
Message-Id: <u9og5upkbl.fsf@wcl-l.bham.ac.uk>
WWW <w_jianminNOw_SPAM@hotmail.com.invalid> writes:
> I am on a project in which I use a client control to generate a file
> on the client computer. I want to upload this file to the server,
> but I don't want the client use the browse button to choose
> which file to upload. I know in NT server IIS can buy SA-fileup
> control do that. But I am using APACHE server.
The server is irrelevant. This is a pure client-side question. Is
the client control written in Perl? If so we need more info. If not
then this question has nothing to do with Perl.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Thu, 25 May 2000 20:40:41 +0200
From: raphael <R.Arlitt@itm.rwth-aachen.de>
Subject: HPUX 9.x /10.x and Perl 5.6.0
Message-Id: <392D73A9.80379FD3@itm.rwth-aachen.de>
Promise not to laugh!
I keep trying to install PERL 5.6
on an HPUX 735 Workstation running
the HPUX 9.07 operating system.
I also tried on a dual processor HP
workstation running HPUX 10.20.
In the HPUX 9.07 case I could not get binarys
and that's why I tried to compile from source.
I wasn't able to make the executables on both
machines!
I try to compile with the HP C Compiler and
therefore use cc -Ae ... as shown in the
config.sh file.
I hope any of you fellows have a compareable
system (HPUX 9.x 10.x) and maybe are able
to tell me what I oversaw ... to get my
beloved Perl up and running.
I will append my config.sh file generated
by the Configure script, so maybe if anybody
could have a look at it or send me his config.sh?
And even if you just got that configuration running,
just tell me so I just get motivated to go on.
Raphael
Including: -output from myconfig
-make error message
- config.sh
./myconfig
Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration:
Platform:
osname=hpux, osvers=10.20, archname=PA-RISC2.0
uname='hp-ux loredana b.10.20 a 9000780 2004527048 two-user license
'
config_args='-de'
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef
usemultiplicity=undef
useperlio=undef d_sfio=undef uselargefiles=define
use64bitint=undef use64bitall=undef uselongdouble=undef
usesocks=undef
Compiler:
cc='cc', optimize='-O', gccversion=
cppflags='-D_HPUX_SOURCE -Aa -I/usr/local/include'
ccflags =' -D_HPUX_SOURCE -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64 -Ae'
stdchar='unsigned char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, usemymalloc=y, prototype=define
Linker and Libraries:
ld='ld', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
libs=-lnsl_s -lndbm -ldld -lm -lc -lndir -lcrypt -lsec
libc=/lib/libc.sl, so=sl, useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_hpux.xs, dlext=sl, d_dlsymun=undef, ccdlflags='-Wl,-E
-Wl,-B,deferred '
cccdlflags='+z', lddlflags='-b +vnocompatwarnings -L/usr/local/lib'
make : ...
echo Makefile.SH cflags.SH config_h.SH makeaperl.SH
makedepend.SH maked
ir.SH myconfig.SH writemain.SH | tr ' ' '\n' >.shlist
Updating makefile...
test -s perlmain.c && touch perlmain.c
cd x2p; make depend
sh ../makedepend MAKE=make
echo hash.c str.c util.c walk.c | tr ' ' '\n' >.clist
Finding dependencies for hash.o.
Finding dependencies for str.o.
Finding dependencies for util.o.
Finding dependencies for walk.o.
echo Makefile.SH cflags.SH | tr ' ' '\n' >.shlist
Updating makefile...
`sh cflags libperl.a pp_sys.o` pp_sys.c
CCCMD = cc -Ae -DPERL_CORE -c -D_HPUX_SOURCE
-I/usr/local/include -D
_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O
cc: "pp_sys.c", line 291: error 1000: Unexpected symbol: "const".
cc: "pp_sys.c", line 291: error 1000: Unexpected symbol: "mode".
cc: "pp_sys.c", line 293: error 1000: Unexpected symbol: "switching
effective ui
d is not implemented".
cc: "pp_sys.c", line 295: error 1000: Unexpected symbol: "return".
cc: "pp_sys.c", line 296: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 303: error 1000: Unexpected symbol: "n_a".
cc: "pp_sys.c", line 305: error 1000: Unexpected symbol: "gimme".
cc: "pp_sys.c", line 341: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 293: error 1506: Parameters allowed in function
definitiononly.
cc: "pp_sys.c", line 304: warning 557: Missing declaration specifiers,
"int" ass
umed.
cc: "pp_sys.c", line 305: error 1588: "GIMME_V" undefined.
cc: "pp_sys.c", line 309: error 1588: "PL_op" undefined.
cc: "pp_sys.c", line 309: error 1532: Reference through a non-pointer.
cc: "pp_sys.c", line 309: error 1588: "OPpOPEN_IN_RAW" undefined.
cc: "pp_sys.c", line 309: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 311: error 1532: Reference through a non-pointer.
cc: "pp_sys.c", line 311: error 1588: "OPpOPEN_IN_CRLF" undefined.
cc: "pp_sys.c", line 311: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 313: error 1588: "fp" undefined.
cc: "pp_sys.c", line 313: error 1588: "tmps" undefined.
cc: "pp_sys.c", line 314: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 315: error 1588: "G_VOID" undefined.
cc: "pp_sys.c", line 315: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 321: error 1588: "G_SCALAR" undefined.
cc: "pp_sys.c", line 321: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 322: error 1588: "TARG" undefined.
cc: "pp_sys.c", line 323: error 1588: "Nullch" undefined.
cc: "pp_sys.c", line 323: error 1564: Expression in while must be
scalar.
cc: "pp_sys.c", line 330: error 1588: "SV" undefined.
cc: "pp_sys.c", line 351: error 1588: "G_SCALAR" undefined.
cc: "pp_sys.c", line 351: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 352: error 1588: "RETPUSHUNDEF" undefined.
cc: "pp_sys.c", line 355: error 1588: "RETURN" undefined.
cc: "pp_sys.c", line 381: error 1000: Unexpected symbol: ")".
cc: "pp_sys.c", line 358: error 1586: Redefinition of function "PP".
cc: "pp_sys.c", line 360: error 1588: "OP" undefined.
cc: "pp_sys.c", line 360: error 1588: "result" undefined.
cc: "pp_sys.c", line 361: error 1588: "iter" undefined.
cc: "pp_sys.c", line 367: error 1588: "ENTER" undefined.
cc: "pp_sys.c", line 370: error 1588: "PL_tainting" undefined.
cc: "pp_sys.c", line 370: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 375: error 1588: "TAINT" undefined.
cc: "pp_sys.c", line 376: error 1588: "PL_no_security" undefined.
cc: "pp_sys.c", line 380: error 1588: "PL_last_in_gv" undefined.
cc: "pp_sys.c", line 381: error 1588: "GV" undefined.
cc: "pp_sys.c", line 381: error 1588: "PL_stack_sp" undefined.
cc: "pp_sys.c", line 381: error 1560: Modifiable lvalue required with
operator "--".
cc: "pp_sys.c", line 383: error 1588: "PL_rs" undefined.
cc: "pp_sys.c", line 387: error 1554: Indirection must be through a
pointer.
cc: "pp_sys.c", line 392: error 1588: "LEAVE" undefined.
cc: "pp_sys.c", line 405: error 1586: Redefinition of function "PP".
cc: "pp_sys.c", line 407: error 1588: "PL_last_in_gv" undefined.
cc: "pp_sys.c", line 407: error 1588: "cGVOP_gv" undefined.
cc: "pp_sys.c", line 415: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 416: error 1000: Unexpected symbol: "len".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "-".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "!=".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "{".
cc: "pp_sys.c", line 419: error 1000: Unexpected symbol: "&".
cc: "pp_sys.c", line 422: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 425: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "!".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "||".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "{".
cc: "pp_sys.c", line 429: error 1000: Unexpected symbol: "void".
cc: "pp_sys.c", line 430: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 430: error 1000: Unexpected symbol: "&&".
cc: "pp_sys.c", line 431: error 1000: Unexpected symbol: "sv_catpv".
cc: "pp_sys.c", line 431: error 1000: Unexpected symbol: "
...caught".
cc: "pp_sys.c", line 434: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 435: error 1000: Unexpected symbol: "!".
cc: "pp_sys.c", line 435: error 1000: Unexpected symbol: "||".
cc: "pp_sys.c", line 436: error 1000: Unexpected symbol: "tmpsv".
cc: "pp_sys.c", line 438: error 1000: Unexpected symbol: "%".
cc: "pp_sys.c", line 440: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 445: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 447: error 1000: Unexpected symbol: "len".
cc: "pp_sys.c", line 448: error 1000: Unexpected symbol: "multiarg".
cc: error 2017: Cannot recover from earlier errors, terminating.
*** Error exit code 1
Stop.
config.sh generated by Configure
------------------------------------------------
I probably should change uselargefiles='define' to undefine
I also tried i_unistd="$undef" in the hints/hpux.sh file
since I got some error messages in perl.c and found that hint.
------------------------------
Date: Thu, 25 May 2000 20:11:06 +0200
From: Raphael Arlitt <raphael.arlitt@mmw.fh-aachen.de>
Subject: Re: HPUX and Perl
Message-Id: <392D6CBA.69F4C62B@mmw.fh-aachen.de>
Here is the message from the make command. I can compile about
15 source file but by compiling pp_sys.c I run into (please see below
for the
output of ./myconfig):
bash-2.02$ make
`sh cflags libperl.a pp_sys.o` pp_sys.c
CCCMD = cc -Ae -DPERL_CORE -c -D_HPUX_SOURCE
-I/usr/local/include -D
_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -Ae -O
cc: "pp_sys.c", line 291: error 1000: Unexpected symbol: "const".
cc: "pp_sys.c", line 291: error 1000: Unexpected symbol: "mode".
cc: "pp_sys.c", line 293: error 1000: Unexpected symbol: "switching
effective ui
d is not implemented".
cc: "pp_sys.c", line 295: error 1000: Unexpected symbol: "return".
cc: "pp_sys.c", line 296: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 303: error 1000: Unexpected symbol: "n_a".
cc: "pp_sys.c", line 305: error 1000: Unexpected symbol: "gimme".
cc: "pp_sys.c", line 341: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 293: error 1506: Parameters allowed in function
definitiononly.
cc: "pp_sys.c", line 304: warning 557: Missing declaration specifiers,
"int" ass
umed.
cc: "pp_sys.c", line 305: error 1588: "GIMME_V" undefined.
cc: "pp_sys.c", line 309: error 1588: "PL_op" undefined.
cc: "pp_sys.c", line 309: error 1532: Reference through a non-pointer.
cc: "pp_sys.c", line 309: error 1588: "OPpOPEN_IN_RAW" undefined.
cc: "pp_sys.c", line 309: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 311: error 1532: Reference through a non-pointer.
cc: "pp_sys.c", line 311: error 1588: "OPpOPEN_IN_CRLF" undefined.
cc: "pp_sys.c", line 311: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 315: error 1588: "G_VOID" undefined.
cc: "pp_sys.c", line 315: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 321: error 1588: "G_SCALAR" undefined.
cc: "pp_sys.c", line 321: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 322: error 1588: "TARG" undefined.
cc: "pp_sys.c", line 323: error 1588: "Nullch" undefined.
cc: "pp_sys.c", line 323: error 1564: Expression in while must be
scalar.
cc: "pp_sys.c", line 330: error 1588: "SV" undefined.
cc: "pp_sys.c", line 330: error 1588: "sv" undefined.
cc: "pp_sys.c", line 334: error 1588: "Nullch" undefined.
cc: "pp_sys.c", line 334: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 347: error 1588: "TAINT" undefined.
cc: "pp_sys.c", line 351: error 1588: "G_SCALAR" undefined.
cc: "pp_sys.c", line 351: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 352: error 1588: "RETPUSHUNDEF" undefined.
cc: "pp_sys.c", line 355: error 1588: "RETURN" undefined.
cc: "pp_sys.c", line 381: error 1000: Unexpected symbol: ")".
cc: "pp_sys.c", line 358: error 1586: Redefinition of function "PP".
cc: "pp_sys.c", line 360: error 1588: "OP" undefined.
cc: "pp_sys.c", line 360: error 1588: "result" undefined.
cc: "pp_sys.c", line 361: error 1588: "iter" undefined.
cc: "pp_sys.c", line 367: error 1588: "ENTER" undefined.
cc: "pp_sys.c", line 370: error 1588: "PL_tainting" undefined.
cc: "pp_sys.c", line 370: error 1563: Expression in if must be scalar.
cc: "pp_sys.c", line 375: error 1588: "TAINT" undefined.
cc: "pp_sys.c", line 376: error 1588: "PL_no_security" undefined.
cc: "pp_sys.c", line 380: error 1588: "PL_last_in_gv" undefined.
cc: "pp_sys.c", line 381: error 1588: "GV" undefined.
cc: "pp_sys.c", line 381: error 1588: "PL_stack_sp" undefined.
cc: "pp_sys.c", line 381: error 1560: Modifiable lvalue required with
operator "--".
cc: "pp_sys.c", line 383: error 1588: "PL_rs" undefined.
cc: "pp_sys.c", line 387: error 1554: Indirection must be through a
pointer.
cc: "pp_sys.c", line 392: error 1588: "LEAVE" undefined.
cc: "pp_sys.c", line 405: error 1586: Redefinition of function "PP".
cc: "pp_sys.c", line 407: error 1588: "PL_last_in_gv" undefined.
cc: "pp_sys.c", line 407: error 1588: "cGVOP_gv" undefined.
cc: "pp_sys.c", line 415: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 416: error 1000: Unexpected symbol: "len".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "-".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "!=".
cc: "pp_sys.c", line 417: error 1000: Unexpected symbol: "{".
cc: "pp_sys.c", line 419: error 1000: Unexpected symbol: "&".
cc: "pp_sys.c", line 422: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 425: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "!".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "||".
cc: "pp_sys.c", line 427: error 1000: Unexpected symbol: "{".
cc: "pp_sys.c", line 429: error 1000: Unexpected symbol: "void".
cc: "pp_sys.c", line 429: error 1000: Unexpected symbol: "SvUPGRADE".
cc: "pp_sys.c", line 430: error 1000: Unexpected symbol: "if".
cc: "pp_sys.c", line 430: error 1000: Unexpected symbol: "&&".
cc: "pp_sys.c", line 431: error 1000: Unexpected symbol: "sv_catpv".
cc: "pp_sys.c", line 431: error 1000: Unexpected symbol: "
...caught".
cc: "pp_sys.c", line 434: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 435: error 1000: Unexpected symbol: "!".
cc: "pp_sys.c", line 435: error 1000: Unexpected symbol: "||".
cc: "pp_sys.c", line 436: error 1000: Unexpected symbol: "tmpsv".
cc: "pp_sys.c", line 438: error 1000: Unexpected symbol: "%".
cc: "pp_sys.c", line 440: error 1000: Unexpected symbol: "}".
cc: "pp_sys.c", line 445: error 1000: Unexpected symbol: "char".
cc: "pp_sys.c", line 447: error 1000: Unexpected symbol: "len".
cc: "pp_sys.c", line 448: error 1000: Unexpected symbol: "multiarg".
cc: error 2017: Cannot recover from earlier errors, terminating.
*** Error code 1
Stop.
I should have included the output from the ./myconfig commmand.
Here it is (anyway it should be similar to the information in the
config.sh file). Here it is:
bash-2.02$ ./myconfig
Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration:
Platform:
osname=hpux, osvers=10.20, archname=PA-RISC2.0
uname='hp-ux loredana b.10.20 a 9000780 2004527048 two-user license
'
config_args='-de'
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef
usemultiplicity=undef
useperlio=undef d_sfio=undef uselargefiles=define
use64bitint=undef use64bitall=undef uselongdouble=undef
usesocks=undef
Compiler:
cc='cc', optimize='-O', gccversion=
cppflags='-D_HPUX_SOURCE -Aa -I/usr/local/include'
ccflags =' -D_HPUX_SOURCE -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64 -Ae'
stdchar='unsigned char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, usemymalloc=y, prototype=define
Linker and Libraries:
ld='ld', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
libs=-lnsl_s -lndbm -ldld -lm -lc -lndir -lcrypt -lsec
libc=/lib/libc.sl, so=sl, useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_hpux.xs, dlext=sl, d_dlsymun=undef, ccdlflags='-Wl,-E
-Wl,-B,deferred '
cccdlflags='+z', lddlflags='-b +vnocompatwarnings -L/usr/local/lib'
ra wrote:
>
> Promise not to laugh!
>
> I keep trying to install PERL 5.6
> on an HPUX 735 Workstation running
> the HPUX 9.07 operating system.
> I also tried on a dual processor HP
> workstation running HPUX 10.20.
>
> In the HPUX 9.07 case I could not get binarys
> and that's why I tried to compile from source.
> I wasn't able to make the executables on both
> machines!
>
> I try to compile with the HP C Compiler and
> therefore use cc -Ae ... as shown in the
> config.sh file.
>
> I hope any of you fellows have a compareable
> system (HPUX 9.x 10.x) and maybe are able
> to tell me what I oversaw ... to get my
> beloved Perl up and running.
>
> I will append my config.sh file generated
> by the Configure script, so maybe if anybody
> could have a look at it or send me his config.sh?
>
> And even if you just got that configuration running,
> just tell me so I just get motivated to go on.
>
> Raphael
>
> Attachment: config.sh generated by Configure
> ------------------------------------------------
> I probably should change uselargefiles='define' to undefine
> I also tried i_unistd="$undef" in the hints/hpux.sh file
> since I got some error messages in perl.c and found that hint.
>
> ------------------------------------------------------------------------
> Name: config.sh
> config.sh Type: Bourne Shell Program (application/x-sh)
> Encoding: 7bit
--
Raphaelra wrote:
>
> Promise not to laugh!
>
> I keep trying to install PERL 5.6
> on an HPUX 735 Workstation running
> the HPUX 9.07 operating system.
> I also tried on a dual processor HP
> workstation running HPUX 10.20.
>
> In the HPUX 9.07 case I could not get binarys
> and that's why I tried to compile from source.
> I wasn't able to make the executables on both
> machines!
>
> I try to compile with the HP C Compiler and
> therefore use cc -Ae ... as shown in the
> config.sh file.
>
> I hope any of you fellows have a compareable
> system (HPUX 9.x 10.x) and maybe are able
> to tell me what I oversaw ... to get my
> beloved Perl up and running.
>
> I will append my config.sh file generated
> by the Configure script, so maybe if anybody
> could have a look at it or send me his config.sh?
>
> And even if you just got that configuration running,
> just tell me so I just get motivated to go on.
>
> Raphael
>
> Attachment: config.sh generated by Configure
> ------------------------------------------------
> I probably should change uselargefiles='define' to undefine
> I also tried i_unistd="$undef" in the hints/hpux.sh file
> since I got some error messages in perl.c and found that hint.
>
> ------------------------------------------------------------------------
> Name: config.sh
> config.sh Type: Bourne Shell Program (application/x-sh)
> Encoding: 7bit
--
Raphael
------------------------------
Date: Thu, 25 May 2000 20:23:07 +0200
From: Raphael Arlitt <raphael.arlitt@mmw.fh-aachen.de>
Subject: Re: HPUX and Perl
Message-Id: <392D6F8B.1DDC9C52@mmw.fh-aachen.de>
Sorry for the form - but problem still alive!
Raphael
Drew Simonis wrote:
>
> > Attachment: config.sh generated by Configure
> > ------------------------------------------------
> > Name: config.sh
> > config.sh Type: Bourne Shell Program (application/x-sh)
> > Encoding: 7bit
>
> How'd that get past my news server filters! I didn't think
> it was good form to post with attachments.
--
Raphael
------------------------------
Date: 25 May 2000 13:31:54 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: HPUX and Perl
Message-Id: <877lciqy5h.fsf@limey.hpcc.uh.edu>
>> On Thu, 25 May 2000 19:05:25 +0200,
>> ra <R.Arlitt@itm.rwth-aachen.de> said:
> I try to compile with the HP C Compiler and therefore
> use cc -Ae ... as shown in the config.sh file.
Hi,
I haven't used HPUX for yonks so I could be orating from
an orifice, but I recall that you need -Aa for ANSI.
perl../README.hpux:
=head2 The HP ANSI C Compiler
When using this compiler to build Perl, you should make sure that
the flag -Aa is added to the cpprun and cppstdin variables in the
config.sh file.
(Good brain!)
Is that what you need?
hth
t
------------------------------
Date: Thu, 25 May 2000 15:32:32 -0500
From: Russ Jones <russ_jones@rac.ray.com>
To: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: HPUX and Perl
Message-Id: <392D8DE0.1158D321@rac.ray.com>
Tony Curtis wrote:
> >> ra <R.Arlitt@itm.rwth-aachen.de> said:
> > I try to compile with the HP C Compiler and therefore
> > use cc -Ae ... as shown in the config.sh file.
>
> I haven't used HPUX for yonks so I could be orating from
> an orifice, but I recall that you need -Aa for ANSI.
>
If you're using the bundled HP-UX compiler, I don't think you'll ever
get perl to install. It doesn't support the ansi -Aa parm, you have to
pay extra for that. I always use gcc to install perl. Of course, first
you have to get gcc to install.
--
Russ Jones - HP OpenView IT/Operatons support
Raytheon Aircraft Company, Wichita KS
russ_jones@rac.ray.com 316-676-0747
When cryptography is outlawed, only outlaws will
A2bgg c4dc8 aji0i knS4E 7eFj8 22Rl1
ZdGg3 gu8i6 lu12N s6NoG gn3g3 q835n
------------------------------
Date: 25 May 2000 18:34:52 GMT
From: abigail@arena-i.com (Abigail)
Subject: Re: Interpolation of array in matching
Message-Id: <8gjroc$2m3$1@news.panix.com>
On Thu, 25 May 2000 12:39:49 +0200, Louis des Tombe <destombe@let.uu.nl> wrote:
++
++ I do not understand the behavior of m/@array/.
++
++ It is said to interpolate @array like within double quotes,
++ but why do I get this:
++
++ program:
++
++ @a = qw (a b c);
++ $_='a';
++
++ print"@a ";
++ print "match" if /@a/;
++ print"\n";
++
++ $" = '|';
++
++ print"@a ";
++ print "match" if /@a/;
++ print"\n";
++
++ output:
++
++ a b c
++ a|b|c match
Well, that's very very trivial. As you see, without setting $",
"@a " equals "a b c ". Now, "a" doesn't match "a b c ", because
"a" doesn't contain a space after the 'a'.
After setting $", "@a " equals "a|b|c ". And that of course is
matched by "a", as it equals the first alternative.
What exactly don't you understand?
Abigail
------------------------------
Date: 25 May 2000 20:37:05 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Is anything planned re: Perl error reporting?
Message-Id: <959284803.5158@itz.pp.sci.fi>
In article <8gjdqo$a6g$1@nnrp1.deja.com>, ajmayo@my-deja.com wrote:
>as you see, the string is unterminated in the same way as it was with
>the Perl code. And the compiler reports:-
>
>test1.java:5: String not terminated at end of line.
> s = "hello +
> ^
>test1.java:6: ';' expected.
> "goodbye";
>^
>2 errors
>
>See what I mean. You get the same behaviour from the reference
>Javascript compiler, too. Why must Perl march to the beat of a
>different drum?
Because in Perl a multi-line string is perfectly okay?
The closest the Perl compiler could get to the above output for your
example would be something like the following:
err.pl:2: syntax error
"print 2;");
^
err.pl:2: Can't find string terminator '"' anywhere before EOF
(Might be a runaway multi-line "" string starting on line 1)
"print 2;");
^
2 errors
Now IMHO this is no more helpful than the current output, except for
autogenerated code. And the problem there is really with the code
generator failing to insert appropriate #line comments. But if other
people prefer this style, I suppose it couldn't be too hard to change.
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Thu, 25 May 2000 14:53:24 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Is anything planned re: Perl error reporting?
Message-Id: <Pine.GSO.4.10.10005251452380.14618-100000@user2.teleport.com>
On 25 May 2000, Ilmari Karonen wrote:
> But if other people prefer this style, I suppose it couldn't be too
> hard to change.
Heck, if someone just suggests that diagnostics.pm could be hacked to
enable this, maybe Abigail will do it before the weekend. :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 25 May 2000 11:25:55 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: need help on perl library call..
Message-Id: <Pine.GSO.4.10.10005251120560.14618-100000@user2.teleport.com>
On Thu, 25 May 2000 e_bengal@my-deja.com wrote:
> Tom, I am kindda confused about your posting. I looked up the place
> where the shellwords.pl is in the perl installation directory.
> Unfortunately, doesn't have any example for this particular library
> call.
Doesn't the start of the file say "Usage:", followed by some examples of
how to call the code? Not that those examples aren't a little cryptic. :-)
If your copy of shellwords.pl doesn't include that "Usage:" information,
maybe it's verrrrry old. Make sure you're looking at one that came with a
version of Perl released, oh, sometime after O.J. was acquitted.
Or is it something other than the usage that you need? I assume that you
know what the subroutine is good for, or you wouldn't be trying so hard to
use it. :-)
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 25 May 2000 21:11:01 GMT
From: patrickshroads@my-deja.com
Subject: Newbie - need to rip images from URL
Message-Id: <8gk4sp$sgi$1@nnrp1.deja.com>
Hello,
I know a little PERL but this seems like it would require some
libraries plus some more advanced coding.
I have a MS SQL Server 7 database table with URLs of images. On a
regular basis I need to rip the image from that url (download the image
to my machine). So I guess I need some sort of Database library and
some sort of HTTP or some thing. Am I in the ballpark? Any ideas? And
how would I even go about doing this whole thing?
Thanks
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 25 May 2000 14:37:42 -0700
From: Makarand Kulkarni <makarand_kulkarni@My-Deja.com>
Subject: Re: Newbie - need to rip images from URL
Message-Id: <392D9D26.DFDFC029@My-Deja.com>
> I have a MS SQL Server 7 database table with URLs of images. On a
> regular basis I need to rip the image from that url (download the image
> to my machine). So I guess I need some sort of Database library and
> some sort of HTTP or some thing. Am I in the ballpark? Any ideas? And
> how would I even go about doing this whole thing?
#!/usr/local/bin/perl5 -w
use LWP::UserAgent;
# this is the gif to grab
my $url ="http://developer.irt.org/images/irt-sm.gif";
# Create a user agent object
my $ua = new LWP::UserAgent;
# Create a request
my $req = new HTTP::Request GET => $url ;
$req->content_type('application/x-www-form-urlencoded');
# Pass request to the user agent and get a response back
my $res = $ua->request($req);
binmode ( STDOUT );
print STDOUT $res->content ; # you can capture this to a file eg. X.gif
and view with browser.
---
------------------------------
Date: Thu, 25 May 2000 15:09:11 -0400
From: Eli Mansour <elynt@exchange.ml.com>
Subject: newsgroup archives
Message-Id: <392D7A57.CFA6C392@exchange.ml.com>
Is there archives for this newsgroup.
------------------------------
Date: Thu, 25 May 2000 14:27:40 -0700
From: "Lauren Smith" <lauren_smith13@hotmail.com>
Subject: Re: newsgroup archives
Message-Id: <8gk5tq$dlj$1@brokaw.wa.com>
Eli Mansour <elynt@exchange.ml.com> wrote in message
news:392D7A57.CFA6C392@exchange.ml.com...
> Is there archives for this newsgroup.
>
This and all other newsgroups are archived at www.deja.com
Go and be off-topic no more.
Lauren
------------------------------
Date: Thu, 25 May 2000 15:00:15 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: newsgroup archives
Message-Id: <392DA26F.31093EBA@stomp.stomp.tokyo>
Eli Mansour wrote:
> Is there archives for this newsgroup.
Deja Vu is a fairly decent source for
archived articles:
http://www.dejanews.com/
This Deja Vu is not half the server it
once was. Today it is littered with
advertisements, is hard to negotiate
and is extremely slow. Nonetheless,
it is the among the best of sources
for archived articles, once you learn
how to move around in their system.
When you first arrive and, this is
very hard to see with their poor
choice in colors and layout, there
is, upper right area, some whatever
about looking for discussions or
usenet. Can't remember and I cannot
connect to deja vu right now. Anyhow,
upper right, funny looking arrow thing
which is a hot link. This will direct
you into their search facility. Use,
comp.lang.perl.misc
for a search term. This will pull more
articles than you wish to read. Be patient,
deja vu is extremely slow and inefficient.
Godzilla!
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 V9 Issue 3165
**************************************
