[8945] in Perl-Users-Digest
Perl-Users Digest, Issue: 2563 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 12 06:09:46 1998
Date: Tue, 12 May 98 03:00:36 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 12 May 1998 Volume: 8 Number: 2563
Today's topics:
Re: Basic MacPERL <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: bug in win95 read/sysread? <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: Did 'do' find it's file.... <lr@hpl.hp.com>
Re: Did 'do' find it's file.... <danboo@negia.net>
Re: Does Perl have a IDE?I don't like command line. (Ilya Zakharevich)
Re: Does Perl have a IDE?I don't like command line. (Rich Morin)
Re: Get file date <Tony.Curtis+usenet@vcpc.univie.ac.at>
Re: Grieving our dying community <info@purco.qc.ca>
Re: How can you break out of a 'while... ' loop in a fu <dorr@cetrel.lu>
Installing PERL on NT <hauk@forumnett.no>
Re: Learning Perl vs Programming Perl (Books) <hauk@forumnett.no>
Re: memory efficiency question (Tom Mornini)
milliseconds <etoatr@eto.ericsson.se>
Re: MODULE MANIA STRIKES (Was Re: What does this do?) <birgitt@order.booktraders.com>
NG for Xemacs (was: Problem with xemacs and perl syntax <maschi@chemie.fu-berlin.de>
Perl script on Internet Information Server <silvana@ptg.es>
POSIX module help <ismithr@info.curtin.edu.au>
simultaneous access on database ms-access with perl scr <martinez@esigetel.fr>
Re: Tip: Filehandles <danboo@negia.net>
Using SQL in PERL Scripts (Phil Taylor)
Re: writing simple XS functions <Jean-Luc.Szpyrka@sophia.inria.fr>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 11 May 1998 22:46:22 -0700
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Basic MacPERL
Message-Id: <6j8o1t$lqb@bgtnsc03.worldnet.att.net>
You probably also know this, but just in case you don't, the path has to
be relative to the hard drive or share you want to access, not to the
machine name. So, if your machine has a hard drive (or a mounted share)
called Tigger, your code ought to work (assuming there's a Documents
folder in the root of the hard drive, of course). If Tigger is the
machine name, the code is wrong and should be something like
open(ACCESS_LOG,"Macintosh HD:Documents:Access-LOG.com") or die "Can't
open ACCESS-LOG: $!";
Hope this helps,
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
John Moreno wrote in message
<1d8w05p.8to6e61iqwvpcN@roxboro0-011.dyn.interpath.net>...
>Michael Gagne <mkgagne@earthlink.net> wrote:
>
>> I'm having trouble opening a file with MacPERL. I'm trying:
>> open($ACCESS_LOG, "Tigger:Documents:Access-LOG.com")
>>
>> It doesn't seem to recognize the file. Please help with this most
>> simple (yet frustrating) problem. I don't have a problem opening a
file
>> in a UNIX PERL.
>
>Well first off you should be checking to see why it doesn't work - you
>should be using die and $!
>
>Other than that - the first thing I see is that I find the $ACCESS_LOG
>highly suspicious, highly. Second thing - you haven't specified
whether
>this is for reading or for writing (actually you have, but I wouldn't
>want to do it in that manner).
>
>--
>John Moreno
------------------------------
Date: Mon, 11 May 1998 22:53:16 -0700
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: bug in win95 read/sysread?
Message-Id: <6j8o53$ma6@bgtnsc03.worldnet.att.net>
Well, you wouldn't want to be in binmode on a Mac or Unix machine, for
instance.
Binmode is a hack, essentially for MSDOS-derived machines that can react
badly to files containing embedded \01A characters (as many binary files
do). Mac, Unix and most other operating systems that are smart enough to
handle Perl don't have that problem, so they don't need binmode. I
suppose you could binmode() a Unix file, but it would certainly cause
you to have to deal with more overhead (not to mention possible
unforeseen side effects).
Maybe when the distributions are merged for 5.005 opening a file will
assume binmode() but will allow it for backward compatibility. Maybe.
But don't count on it. :D
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
Zenin wrote in message <894940429.823987@thrush.omix.com>...
>Martien Verbruggen <mgjv@comdyn.com.au> wrote:
> >snip<
>: DOS/win95/NT thinks there's a difference between text files and
binary
>: files. You have to use binmode on your file handle.
>:
>: # perldoc -f binmode
>
> Speaking of which, when the hell would anyone not want to be in
> binmode()? I meen, shouldn't open() just implicitly call it for
> you?
>
>--
>-Zenin
> zenin@archive.rhps.org
------------------------------
Date: Mon, 11 May 1998 23:44:51 -0700
From: "Larry Rosler" <lr@hpl.hp.com>
Subject: Re: Did 'do' find it's file....
Message-Id: <6j8r6d$sfc@hplntx.hpl.hp.com>
[posted and emailed]
Sarah Hluchan wrote in message <3557CBA3.C52@csi.com>...
>do "bogus filename";
>die $@ if $@;
>
>hmmm, there is no "bogus filename" in the filesystem, and that doesn't
die.
>
>I like that "do" will search @INC for me, and I may want to "do"
>the same file a few times & have it parsed each time. How can
>I tell if "do" didn't find it's file?
>
>-y
do or die!
do "bogus filename" or die $!;
Just make sure that the file to be executed ends with TRUE (1;).
--
Larry Rosler
Hewlett-Packard Laboratories
lr@hpl.hp.com
------------------------------
Date: Tue, 12 May 1998 01:26:40 -0400
From: Dan Boorstein <danboo@negia.net>
Subject: Re: Did 'do' find it's file....
Message-Id: <3557DD90.6855D89F@negia.net>
Sarah Hluchan wrote:
>
> do "bogus filename";
> die $@ if $@;
>
> hmmm, there is no "bogus filename" in the filesystem, and that doesn't die.
check out the perlvar man page for a full explanation, but in short,
you are checking the wrong variable to see if there was an error in
"do"ing the file. to "do" the file perl must make a system call which
fails if the file is not found. for this reason it is $! that you
should be checking instead of $@, which holds the errors related
to 'eval'. think of it as though you are checking the implicit 'open'
that "do" does.
hope this helps,
--
Dan Boorstein home: danboo@negia.net work: danboo@y-dna.com
"THERE IS AS YET INSUFFICIENT DATA FOR A MEANINGFUL ANSWER."
- Cosmic AC
------------------------------
Date: 12 May 1998 06:44:04 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6j8r3k$4fb$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Tom Christiansen
<tchrist@mox.perl.com>],
who wrote in article <6j5gfm$9v1$1@csnews.cs.colorado.edu>:
> As Randal has pointed out, this should highlight differently
>
> foo / 3 ; # / ; # This is function foo, divided by 3
>
> than it would if it had seen this declaration, which of course
> might be hidden in a module that got used:
>
> BEGIN { eval "sub foo ()" }
> foo / 3 ; # / ; # This is function foo, divided by 3
>
> Until this is taken care of, they all lie.
Correct. But tell me last time you have seen a construction as in the
first example. CPerl chooses the second variant (unless it knows that
`foo' is logical, say, `xor'), and I did not see the case when it
breaks yet.
(Though after this post of mine people will start using this info to
obfuscate Perl signatures - there is nothing more
Perl-signature-unobfuscating than code-highlighting them by CPerl. ;-)
------------------------------
Date: Tue, 12 May 1998 01:12:51 -0700
From: rdm@cfcl.com (Rich Morin)
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <rdm-1205980112530001@140.174.42.30>
In article <fl_aggie-1105982140000001@aggie.coaps.fsu.edu>,
fl_aggie@thepentagon.com (I R A Aggie) wrote:
> And I've come around to the point of view that perl is a miserable
> [language] for people who've never programmed before.
An opinion we have tried to disprove in "MacPerl: Power and Ease". We
first explain fundamental programming concepts (three chapters), then
introduce a subset of Perl (four chapters). Time will tell if this is
enough background to allow the readers to wade into the "cookbook"
and reference chapters that follow. (We *do*, in any case, point to
the appropriate (generally ORA) books as ways to fill in the gaps...)
>>>>> "Ken" == Ken Williams <ken@forum.swarthmore.edu> writes:
Ken> The point is that beginners often lack some basic concepts that never
Ken> would have occurred to the people that wrote the man pages.
Unfortunately, books on programming languages often skip over basic
concepts, as well. This saves space, to be sure, but makes it hard for
beginners to climb on board. We decided to assume that our readers are
intelligent and motivated, but not necessarily programmers; hence, our
chapters on programming concepts. By the same token, we decided not to
attempt a recapitulation of the ORA offerings (why be silly?).
If anyone is interested in seeing our approach, visit the online (HTML)
copy, available as http://www.ptf.com/macperl/ptf_book/HTML For more
general information, see the MacPerl Pages (http://www.ptf.com/macperl).
-r
--
Canta Forda Computer Laboratory | Prime Time Freeware - quality
UNIX consulting, training, & writing | freeware at affordable prices
+1 415-873-7841 | +1 408-433-9662 -0727 (Fax)
Rich Morin, rdm@cfcl.com | www.ptf.com, info@ptf.com
------------------------------
Date: 12 May 1998 09:07:06 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Get file date
Message-Id: <7x7m3svug5.fsf@beavis.vcpc.univie.ac.at>
Re: Get file date, Chris <fuc@esquel.com> said:
Chris> Hi everybody, Anyone knows how to use script to fetch
Chris> the file date?
Sorry, this question is completely meaningless. Try
supplying some detail and preferably some sample perl so we
can see where the problem is.
tony
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
"You see? You see? Your stupid minds! Stupid! Stupid!" ~ Eros, Plan9 fOS.
------------------------------
Date: Tue, 12 May 1998 05:46:25 GMT
From: Leon Stepanian <info@purco.qc.ca>
Subject: Re: Grieving our dying community
Message-Id: <3557E318.F9AFD99A@purco.qc.ca>
Greg Bacon wrote:
> In article <6issr5$6rk@mozo.cc.purdue.edu>,
> gebis@albrecht.ecn.purdue.edu (Michael J Gebis) writes:
> : I'm not saying that the flood of newbie questions doesn't
> : get on my nerves, but I think a lot of people who should
> : know better are only adding noise and hostility to the mix.
>
> clpmod : clpmisc :: Perl : FORTRAN
>
> :-),
> Greg
> --
> open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
> f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
> d2ac158c84c4ece4d22d1000118a8d5491000000
> EOF
I think this is very right.
Who are these newbies? I am still a newbie after two years fiddling with
Perl. I have managed to write some good code, granted sometimes a
five-liner could be condensed into a one-liner by the more proficient
Perlscriptors.
Maybe we need a new group called comp.lang.perl.newbie where more
mundane or direct questions could be addressed in a more layman style. I
am sure, as I have in the past, that there are a large number of
readers who are extremely intimidated by the level of proficiency which
is most often displayed in this group, so both sides of the coin exist.
Maybe there should be two coins.
You should not forget that we can't go to school to learn Perl. We are
mostly alone on our computers, with our books, with our own
misconceptions, trying to figure out what the pro's see as most obvious.
Of course, if I painted the MonaLisa, I'd know what it is about, but for
me to explain it in writting, and expect you to then see the exact
portrait is not a given.
We are mostly also limited in time, or we wind up alone with allimony
payments. We love to learn and Perl has opened our eyes again and given
us some control back from the $M rapery which we all have to cope with.
Changes from DOS control to Windows dependance, then internet freedom to
now an Internet oversaturation of information and distracting directions
have all played on all of us. That and the fact that the mortgage still
has to be paid at the end on the month kind of brings us back to
reality.
If we now have to deal with paranoia because we don't know if a question
on Perl meets a certain standard, then we are really in bad shape. What
one person considers trivial, may be in fact ultra essential to someone
else who is more than stuck, but actually frozen in time because a
certain problem has blocked further progress. Does this feel good.
Yes, trying, searching, experimenting is learning. But I am sure that in
most cases, questions to this group have been honest ones, and not all
about Page1 from lazy people not willing to do some honest work on their
own. On the contrary, I personally commend anyone who even shows some
genuine interest as this is from where they can then grow. It seems to
me that a pat on the back and a word of encouragement should be the norm
and not the exception.
Just as writers need someone to proof read their work because at a
certain point, one cannot see any more mistakes, but still knows there
is a problem, why then should anyone consider that questions are either
good or bad. Why not also appreciate the level of progress one had to
make in Perl to even ask a question in the first place, and feel happy
that this progress is being displayed even if it is usually a cry for
help, without fear of public reprisal. If you think it is easy for most
people to address a problem to the group, maybe think again.
What we are forgetting is that you are all on this newsgroup because you
want be here. You want to help people. You like it when Perl is known.
You need to show that you master the subject and you can stand as a
pillar or lightpost for those who cannot see that far. So why then
should there be all this gripping. Even though one can master a language
and concept, it does not discard them from the public responsibility of
activing in a descent manner to others, regardless of their level of
understanding. That's what teaching is all about. Or maybe we have
forgotten how to teach.
As a 2 year newbie, I for one have always felt like this is home. And I
have learned alot more from this group than from any books, or
databases, because, as always, information is static, problems are
dynamic, and solving problems is fantastic. Thank you to all.
Leon Stepanian
Perl.......from an ocean of human kinds!
------------------------------
Date: Mon, 11 May 1998 17:32:47 +0200
From: Denis DORR <dorr@cetrel.lu>
Subject: Re: How can you break out of a 'while... ' loop in a function?
Message-Id: <35571A1F.7DA2E0AE@cetrel.lu>
Stuart Wright wrote:
>
> A simple question, but all the pearl FAQs are useless.
> All I want is a basic perl/cgi reference - all the commands, functions
> etc.
> Very hard to find one.
Don't think so !
Assuming you have the Perl documentation on your system (you *should*) :
perldoc perlfun
/break
will display :
...skipping...
last The last command is like the break statement in C (as used
in
loops); it immediately exits the loop in question. If the
...
--
HTH.
dorr@cetrel.lu
------------------------------
Date: Tue, 12 May 1998 09:10:59 +0200
From: Hauk Langlo <hauk@forumnett.no>
Subject: Installing PERL on NT
Message-Id: <3557F603.33C0D4B0@forumnett.no>
Hi there. After using PERL at work for some weeks I have finally got my
own PC at home. I'm pretty new to the PC format and have not managed to
successfully install/build perl on my PC. I got a file called
perl5.00402-bindist04-bc. I have done the installation process but my
perl programs will not work like they do at my job, they will not work
at all really. Do anyone know exactly what kind of thins I will have to
do in order to run PERL programs on my Win-NT PC? Any help would be
apprecuated. Thanks.
Hauk Langlo (JAPH)
------------------------------
Date: Tue, 12 May 1998 08:58:18 +0200
From: Hauk Langlo <hauk@forumnett.no>
To: Treeskunk <Treeskunk@aol.com>
Subject: Re: Learning Perl vs Programming Perl (Books)
Message-Id: <3557F30A.D4AE89A8@forumnett.no>
Treeskunk wrote:
> I'm a programmer and am interested in both of these books. I would like to get Learning because it talks about CGI. However, I would like to get Programming because I feel it is probably more for programmers. Any suggestions? Is the information from the CGI chapter in Learning available anywhere else (on the net) so if I get Programming I will not miss anything?
>
>
Hi there. I'm myselfe learning PERL these days. Beeing a solid programmer on the Amiga platform (non object oriented languages though), I knew the general rules in programig. I decided to start solely with "Learning PERL" (the Llama book). I must say that it did not take long until I was missing something. When I got "Programming PERL" (Camel book) a week later it
was such a releif. In my opinion a lot of things are easier to learn from the latter book. I guess that if you buy both you will have a very complete litterature. If you will only buy one of the books, then go for "Programing PERL" (Camel). I also know that experienced programmers might find "learning PERL" a bit too simple. There is also a special CGI book called
"CGI Programming on the world wide web" from the same publisher. This book is written for CGI programing in PERL. Good luck.
Hauk Langlo (JAPH)
------------------------------
Date: Tue, 12 May 1998 05:21:57 GMT
From: tmornini@netcom.com (Tom Mornini)
Subject: Re: memory efficiency question
Message-Id: <tmorniniEstw8L.860@netcom.com>
Ala Qumsieh (aqumsieh@matrox.com) wrote:
: > @myarray=<FILEHANDLE>
: >
: > David
: This loads the entire file into an array. This should be faster, but if
: your file is large, you might have memory problems ...
: Using either approaches really depends on your application.
You'd better benchmark that! I assumed the same thing and found that line
at a time was somewhat faster than loading into an array! Reading the whole
file into a scalar, however, was very fast...
-- Tom Mornini
-- InfoMania
------------------------------
Date: Tue, 12 May 1998 10:10:09 +0200
From: Atle Raestad <etoatr@eto.ericsson.se>
Subject: milliseconds
Message-Id: <355803E1.EC892F5@eto.ericsson.se>
Is it possible to measure in milliseconds in perl. "time" returns
seconds and "times" returns CPU times. I want a function like time, that
return the value in millisecond instead of seconds.
Regards Atle
------------------------------
Date: Tue, 12 May 1998 01:42:49 -0400
From: Birgitt Funk <birgitt@order.booktraders.com>
Subject: Re: MODULE MANIA STRIKES (Was Re: What does this do?)
Message-Id: <3557E159.906E5468@order.booktraders.com>
Tina Marie Holmboe wrote:
>
> In article <3554AD55.2849@juicepigs.com>,
> Bob Trieger <sowmaster@juicepigs.com> writes:
>
> > Using modules is the easiest way to accomplish anything in perl.
> > As the newbies learn what the modules do and how to use them,
> > they can then
> > start looking at how they work.
>
> Using modules _may_ be the easiest way to get a particular task
> done when using Perl, but "reading the fucking source" is *far*
> from being the best way of teaching any newcomer to Perl the language.
>
Wow, thank you very much for this statement. You answered pretty
clearly a question I posted in another thread:
Subject: Reposted cleaned up (hopefully) Re: Reading Code
Versus Writing Code, How You learn, was [Re: perl
scripts dealing with /etc/passwd]
> The original poster asked a question which, on the surface,
> seemed to be related to the read() routine. The first reply -
> on this newsserver atleast was a reference to the Camel. VERY good
> reply; and as the Camel is a fairly good book, a very good reply as
> far as teaching goes.
>
Sure, let's say you read through the book once, next step, you read it
again and solve exercises, but then the next step is what ? More of
translating source code of other people programs or more trying to
write little ones you want to make for yourself.
There is a step between reading the book and applying and testing
yourself about the content of what you have read. You may believe
to have understood just to see in the praxis that you haven't.
Unless you can recognize it in understanding other people's code or
writing your own to a point that it at least seems to work. I would
say one needs to read it over and over again and it takes very much
time "to get it".
> Telling a student to read the *source* to learn something *isn't*
> very clever; it isn't even *smart*. I'd go as far as claim it is
> directly abusive - and reminds me of the old "The best way to learn
> HTML is to look at the source of webpages!"
>
Well, I don't make a comment to that one, but you may guess how
I feel about it.
> Right. And learn all the mistakes. Note before blowing up that
> I do *not* claim there are mistakes in CGI.pm, but it is a *product*.
> Teaching mechanics by showing people one specific car isn't a good
> idea *until they've learned the basics*.
>
> The use of CGI.pm as a tool to accomplish a task is excellent advice.
> The use of CGI.pm as teaching material is exactly the opposite.
>
> The poster wanted to learn about read(). Teach him about read().
>
> > everytime you write a new script? Because somebody has already
> > done the work for uyou, that's why. And that is just what all the
> > modules do, the
> > work for you.
>
> Exactly. So perhaps one should give a person a hammer and tell
> him that he'll learn how to use it whilst building his own house.
>
So, that means learning by writing your own code after having
gotten your basic tool set in reading through one or two books
and the main docs.
What is when you are in the middle and stuck using a huge complicated
perl program, which is changing and in development.
Let's say you had started using it on an application getting
technical and set-up/development support from an expert, just being
a non programming customer/end user. You have already the application
running live and it's expected that you handle it by yourself.
Now you are often confronted with new error messages, new functions,
new features and you want to customize here and there and you can't
afford to pay continously for support by the expert (many of them
don't even like to look at the code as the program is too big and
too much in development - so how is a beginner to deal with it ?).
My goal would be definitely to be able to understand the source
code, but the task seems so overwhelmingly impossible to me
that I started asking myself if it is at all achievable, especially
as I am used to learn more systematically from bottom up. But
the task I need or should accomplish doesn't really permit me
doing so, unless I would give up dealing with this specific
application altogether.
To make an analogy to your hammer and house building, I feel
not having the hammer yet and being asked to tear apart a mansion,
put it back together with my bear hands so that it can become my
own house that suits my needs and will not fall apart on top of my
head. 8-).
Thanks for your answer, I think it is very important to
become more aware about how something is learned and it is
a coincidence that you answered to something I have been
thinking about a lot and asked today in public.
Birgitt Funk
------------------------------
Date: Tue, 12 May 1998 11:05:41 +0200
From: Joerg Maschtaler <maschi@chemie.fu-berlin.de>
Subject: NG for Xemacs (was: Problem with xemacs and perl syntax hilitghtning)
Message-Id: <355810E5.41C6@chemie.fu-berlin.de>
Ala Qumsieh wrote:
>
[...]
>
> Ask somewhere else ..
> how about a newsgroup that discusses emacs?
>
"nngrep -a emacs" puts out hte following for my newsserver:
alt.lucid-emacs.bug
alt.lucid-emacs.help
alt.religion.emacs
bit.listserv.gnuemacs
comp.emacs
comp.emacs.xemacs
fj.editor.emacs
fj.editor.xemacs
fr.comp.applications.emacs
gnu.emacs.announce
gnu.emacs.bug
gnu.emacs.gnews
gnu.emacs.gnus
gnu.emacs.help
gnu.emacs.sources
gnu.emacs.vm.bug
gnu.emacs.vm.info
gnu.emacs.vms
I guess comp.emacs.xemacs is the right group to discuss differences of
two versions of Xemacs.
ciao, Joerg
--
_________________________________________________________
Joerg Maschtaler Email: maschi@chemie.fu-berlin.de
http://userpage.chemie.fu-berlin.de/~maschi/
"Global denken, lokal handeln" Biene Maja
------------------------------
Date: Tue, 12 May 1998 11:53:51 +0200
From: "Silvana Gsmez" <silvana@ptg.es>
Subject: Perl script on Internet Information Server
Message-Id: <35581C2F.23713637@ptg.es>
I have NT 4.O and IIS v. 2.0 and I want executing perl scripts from my
html pages but I can4t. I don4t know how to do it. Do I have to
configure IIS to execute perl scripts?
Thank you.
------------------------------
Date: Tue, 12 May 1998 11:05:05 +0800
From: Ray Smith <ismithr@info.curtin.edu.au>
Subject: POSIX module help
Message-Id: <3557BC61.2781@info.curtin.edu.au>
Hi all,
I have installed perl version 5.004_04 built for IP32-irix on my O2, but
can't seem to get the POSIX module to compile. Everything else seems
OK.
This is what I get when trying to compile the POSIX module:
perl Makefile.PL
Note (probably harmless): No library found for -lposix
Note (probably harmless): No library found for -lcposix
Writing Makefile for POSIX
make
cc -32 -c -I/usr/people/ray/temp/perl5.004_04/
-I/usr/people/ray/temp/perl5.004_04/ext/Fcntl/
-I/usr/people/ray/temp/perl5.004_04/x2p/ -O -Olimit 3149
-DVERSION=\"1.02\" -DXS_VERSION=\"1.02\"
-I/usr/local/lib/perl5/IP32-irix/5.00404/CORE POSIX.c
cfe: Warning 608: POSIX.xs: 337: Undefined the ANSI standard library
defined macro LDBL_MAX
cfe: Warning 608: POSIX.xs: 340: Undefined the ANSI standard library
defined macro LDBL_MIN
cfe: Warning 608: POSIX.xs: 343: Undefined the ANSI standard library
defined macro LDBL_EPSILON
cfe: Warning 712: POSIX.c, line 3534: illegal combination of pointer and
integer
mode = 0666;
---------^
cfe: Error: POSIX.c, line 3536: Cast a non-integral type into a pointer.
mode = (char* )(((Perl_stack_base[ax + (2)])->sv_flags &
0x00020000 ) ? ((XPVNV*)(Perl_stack_base[ax + (2)])->sv_any )->xnv_nv
: Perl_sv_2nv (Perl_stack_base[ax + (2)])) ;
-----------^
*** Error code 1 (bu21)
Can any one help me in this. I also tried to copy my old POSIX module
which seems to be the same version (1.02) but I got an error when it
tried to load the POSIX.so file:
when running a test script which is simply:
#!/usr/bin/perl
require POSIX;
print "hello\n";
I get the following error:
Can't load '/usr/local/lib/perl5/IP32-irix/5.00404/auto/POSIX/POSIX.so'
for module POSIX: 11323:perl: rld: Fatal Error: unresolvable symbol in
/usr/local/lib/perl5/IP32-irix/5.00404/auto/POSIX/POSIX.so: Sv at
/usr/local/lib/perl5/IP32-irix/5.00404/DynaLoader.pm line 166.
Sorry about the length, but I thought that I should add as much as
possible.
Hope someone can help me.
Ray.
--
Ray Smith
Department of Physiotherapy
Curtin University of Technology
Selby St Shenton Park 6008 Aust.
Ph: +61 8 9266 3667
Fax: +61 8 9266 3636
Email: ray@guardian.curtin.edu.au
--
------------------------------
Date: Tue, 12 May 1998 11:11:58 +0200
From: Pascal Martinez <martinez@esigetel.fr>
Subject: simultaneous access on database ms-access with perl scripts via an ODBC driver.
Message-Id: <3558125E.E287431D@esigetel.fr>
Hello the group !
I'm a young programmer in Perl and I like this fabulous language.
I program dynamic CGI scripts with web-databases interconnections and I
have a problem of simultaneous access. I use the library win32::odbc.pm.
Below, a part of my code :
test1 : if($data = new Win32::ODBC("toto"))
{
$requete="SELECT Cle FROM Oeuvre";
$data->Sql($requete);
while($data->FetchRow())
{
$donnee=$data->Data('Cle');
push(@cles_oeuvre,$donnee);
}
$data->Close();
$Cle_oeuvre=max(@cles_oeuvre)+1;
}
else
{
goto(test1);
}
This code runs very well with two users but with more users, it make a
bug.
Does anyone know a code solution for these cases of simultaneous access
?
------------------------------
Date: Tue, 12 May 1998 01:48:32 -0400
From: Dan Boorstein <danboo@negia.net>
Subject: Re: Tip: Filehandles
Message-Id: <3557E2B0.DAAB36BF@negia.net>
Martien Verbruggen wrote:
>
> In article <5q4sywcyxy.fsf_-_@prometheus.frii.com>,
> Nathan Torkington <gnat@frii.com writes:
>
> > I used to use IO::File or FileHandle religiously to make filehandles.
> > No more! I was confused by the many and various ways that you can
> > pass filehandles to subroutines or store them in variables, but now I
> > have seen the light.
[SNIP]
> IOW: You were doing it right. You're doing it dangerously now.
from the Perl FAQ:
Author and Copyright Information
Copyright (c) 1997 Tom Christiansen and Nathan Torkington.
^^^^^^ ^^^^^^^^^^
my guess is that Nathan is at least moderately if not
intimately familiar with the as yet unnamed dangers.
could you elaborate?
--
Dan Boorstein home: danboo@negia.net work: danboo@y-dna.com
"THERE IS AS YET INSUFFICIENT DATA FOR A MEANINGFUL ANSWER."
- Cosmic AC
------------------------------
Date: Tue, 12 May 1998 05:38:59 GMT
From: phil@ackltd.demon.co.uk (Phil Taylor)
Subject: Using SQL in PERL Scripts
Message-Id: <3557df57.2323994@news.demon.co.uk>
I want to use SQL within my PERL scripts to access an RD (say access)
on the server. Can you advise me what components are required to be
installed on the server to make this work (Access Engine, ODBC etc).
------------------------------
Date: Tue, 12 May 1998 09:30:55 +0200
From: Jean-Luc Szpyrka <Jean-Luc.Szpyrka@sophia.inria.fr>
Subject: Re: writing simple XS functions
Message-Id: <3557FAAF.6C7D7A42@sophia.inria.fr>
Ken Williams wrote:
>
> I'm trying to get my feet wet learning XS by translating a few
functions
> in a module to XS. I have a feeling I'm doing it the hard way, and
> figured this would be a great opportunity to torun to the Perl
community
> for help!
You should also have a look at SWIG. This is really simplier to use
than writing an XS stuff.
You'll find it on your prefered CPAN site at:
/authors/id/DBEAZLEY/swig1.1p5.tar.gz
--------------------------------------------------------------------
Jean-luc.Szpyrka@sophia.inria.fr "Taste is the enemy of Art"
INRIA - 2004 route des lucioles - BP 93 Tel: (33/0) 4 92 38 79 69
06902 SOPHIA-ANTIPOLIS cedex (France) Fax: (33/0) 4 92 38 76 02
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.
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 2563
**************************************
