[9139] in Perl-Users-Digest
Perl-Users Digest, Issue: 2757 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 29 01:07:55 1998
Date: Thu, 28 May 98 22:00:26 -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 Thu, 28 May 1998 Volume: 8 Number: 2757
Today's topics:
Re: [Q] Platform independant way of writing hash to dis (Chris Nandor)
Re: [Q] Platform independant way of writing hash to dis (Greg Lindahl)
Re: [Q] Platform independant way of writing hash to dis <tchrist@mox.perl.com>
Re: [Q] Platform independant way of writing hash to dis (Greg Lindahl)
Re: A Email to WWW GaTeWaY, is there such a Thing? (at)trust-me.com (Jason Oakley)
Re: An unwelcome and undeserved slap <house@usq.edu.au>
Autoloader question <finortis@intrex.net>
Re: Bad file # when trying to create a socket. (Mark Maurer)
Re: Clearly define "free software" (Chris Nandor)
Re: Compile Perl5.4 on AIX 4.2 with Gcc 2.8.0 <yzhang@suntze.com.sg>
Re: Copylefting manuals (Chris Nandor)
cpu-lib.pl, fup.cgi <mariatw@pendragon.net>
Re: Don't Know how to decrypt using PERL <dformosa@st.nepean.uws.edu.au>
Re: Email address checker - comments welcome (David Adler)
Re: HELP!!!!!! <Rafkin@Hotmail.com>
How do I pass multiple parameters to a cgi script from (Eliot)
Re: perl's idea of version numbers <mgregory@asc.sps.mot.com>
Re: perl's idea of version numbers <tchrist@mox.perl.com>
Re: perl's idea of version numbers <rootbeer@teleport.com>
perlscript book <seth95@patriot.net>
Re: perlscript book (Nathan V. Patwardhan)
Question on Text Widget Update <krutibas.biswal@sun.com>
Re: read and write (Ilya Zakharevich)
Re: Statistics for comp.lang.perl.misc (Chris Nandor)
Re: Statistics for comp.lang.perl.misc (Greg Lindahl)
Re: Statistics for comp.lang.perl.misc <tchrist@mox.perl.com>
Re: Statistics for comp.lang.perl.misc (Greg Lindahl)
Re: Two output messages from script <rootbeer@teleport.com>
Re: Two output messages from script (at)trust-me.com (Jason Oakley)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 29 May 1998 03:09:58 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: [Q] Platform independant way of writing hash to disk?
Message-Id: <pudge-2805982304220001@dynamic265.ply.adelphia.net>
In article <6kl3q4$a3j1@continuity.mcom.com>,
thaths@netscape.remove_this.com (Thaths) wrote:
# Is there a platform independant way of writing a hash to disk? I have been
# having problems reading a hash on Linux from a file created on Solaris. I
# use DB_File and tie to read / write the hash.
Data::Dumper is slower, but works. It stores it in plain ol' ASCII.
You'd have to reparse it on the way in, or just require it or something.
Play around, you can get it to work probably.
I don't know if the binary files created by Storable will work. Storable
is another module to try.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 29 May 1998 02:24:47 GMT
From: lindahl@pbm.com (Greg Lindahl)
Subject: Re: [Q] Platform independant way of writing hash to disk?
Message-Id: <6kl69f$h9b@news1.newsguy.com>
thaths@netscape.remove_this.com (Thaths) writes:
> Is there a platform independant way of writing a hash to disk? I have been
> having problems reading a hash on Linux from a file created on Solaris. I
> use DB_File and tie to read / write the hash.
If you don't care if it's fast, you can:
foreach $k (keys %hash) {
write FILE "$k|$hash{$k}\n";
}
and then read it back in in a similar fashion. Just watch out for
special characters; my example isn't exactly great code.
If you want to write a hash file which can be _efficiently_ _randomly_
accessed on multiple platforms, I don't think any of the usual
underlying db-style databases support that.
-- g
------------------------------
Date: 29 May 1998 03:53:01 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: [Q] Platform independant way of writing hash to disk?
Message-Id: <6klbet$3sg$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, lindahl@pbm.com (Greg Lindahl) writes:
:foreach $k (keys %hash) {
: write FILE "$k|$hash{$k}\n";
^^^^^
Funny man. Whatever are you thinking?
:If you want to write a hash file which can be _efficiently_ _randomly_
:accessed on multiple platforms, I don't think any of the usual
:underlying db-style databases support that.
Think harder. DB_File is byte-order independent. He's just not giving
us enough information.
--tom
--
They spell it "da Vinci" and pronounce it "da Vinchy". Foreigners
always spell better than they pronounce.
-- Mark Twain
------------------------------
Date: 29 May 1998 04:10:43 GMT
From: lindahl@pbm.com (Greg Lindahl)
Subject: Re: [Q] Platform independant way of writing hash to disk?
Message-Id: <6klcg3$n1l@news1.newsguy.com>
Tom Christiansen <tchrist@mox.perl.com> writes:
> :foreach $k (keys %hash) {
> : write FILE "$k|$hash{$k}\n";
> ^^^^^
> Funny man. Whatever are you thinking?
FORTRAN
> :If you want to write a hash file which can be _efficiently_ _randomly_
> :accessed on multiple platforms, I don't think any of the usual
> :underlying db-style databases support that.
>
> Think harder. DB_File is byte-order independent. He's just not giving
> us enough information.
Neither the manpage nor Programming Perl v2 chapter 7 says that, but I
read the source, and it's true. Golly gee. I know gdbm gets this wrong,
which is one of the reasons it got abandoned...
-- g
------------------------------
Date: Fri, 29 May 1998 03:25:49 GMT
From: waulok(at)trust-me.com (Jason Oakley)
Subject: Re: A Email to WWW GaTeWaY, is there such a Thing?
Message-Id: <356e2a27.2939026@news.comcen.com.au>
On 28 May 1998 13:19:45 GMT, f95pegr@granis.hemmet.s-hem.chalmers.se
(Peter Granroth) wrote:
>on Wed, 27 May 1998 21:21:08 -0500, Igor shared with us the following words of wisdom:
>> If you know where I can find email-to-www gateway (a-la Hotmail) so that
>> I could read email from my Web Browser via HTTP, please email me.
>
>> Thanks.
>
>May I ask, why would you like to do that????
Prolly cos its the IN thing ;)
http://www.netspace.org/cgi-bin/foodora/
is the only one I've found that works on my machine (BSDi).
There are several others, such as web-mail and mail-man.
------------------------------
Date: Fri, 29 May 1998 13:34:48 +1000
From: Ron House <house@usq.edu.au>
Subject: Re: An unwelcome and undeserved slap
Message-Id: <356E2CD8.1C4C6C0E@usq.edu.au>
Wolfgang Denk wrote:
>
> Ron House <house@usq.edu.au> writes:
>
> >> Wolfgang Denk <wd@uebemc.siemens.de> writes:
>
> >> But there's a difference. I think the GNU Linux issue is valid, whereas
> >> calling Perl, GNU Perl wouldn't make sense.
> ...
>
> Please check your quoting!
>
> All of this was NOT my comment on this issue!!!
Please check your quoting!
All of this was NOT my comment on this issue!!!
--
Ron House
house@usq.edu.au
An age is called Dark not because the light fails to shine, but
because people refuse to see it. -- James Michener, "Space"
------------------------------
Date: Fri, 29 May 1998 00:39:23 -0700
From: "finortis" <finortis@intrex.net>
Subject: Autoloader question
Message-Id: <6kle4g$4lu$1@supernews.com>
Guys,
I've got a Perl script that uses about 14 or so modules that I would like to
use the autosplit/autoload on. I've got three Perl books, checked Deja News,
and I can't figure this thing out. I even tried to perfrom this on a test
script using a dummy module, and still no dice.
Lets now suppose I'm totally stupid....OK...I've properly autosplit my
module into a directory (named after the module that was autosplit of
course), along with a file containing each subroutine, and an index file.
Now, I go back to my "main" script....I'm supposed to remove the "use
module" directives, right?? If I include them, I get "can't locate
module.pm" error message, so this must be right...However, there is
something missing...I've included a "use Autoloader" directive...Everything
seems to be intact...
Can somebody please help who has actually gotten this thing to work.
Thanks,
Scott
------------------------------
Date: 29 May 1998 00:42:55 -0400
From: mwmaurer@mtu.edu (Mark Maurer)
Subject: Re: Bad file # when trying to create a socket.
Message-Id: <6klecf$c9c$1@pace1.cts.mtu.edu>
Rick Bauman (rick@internetx.net) wrote:
: When I run the following code I get the error:
:
: You couldn't create a socket, because Bad file number at ./serverscript.pl line 8.
:
: where does the file Number come in?
:
: thanks
: rick
:
: use IO::Socket;
: $sock = new IO::Socket::INET (LocalHost => 'dns1',
: LocalPort => 5465,
: Proto => 'tcp',
: --> listen => 1,
: Reuse => 1
: );
: die "You couldn't create a socket, because $!" unless $sock;
: while ($new_sock = $sock->accept()) {
: while (defined ($buf = <$new_sock>)) {
: print $buf;
: }
: }
: close ($sock);
Well, I got it to work when I put a capital 'L' on listen above...
--
Mark Maurer markm@dct.com mwmaurer@mtu.edu
Programmer, Digital Magic Interactive http://www.dminteractive.com
Senior, Michigan Technological University Houghton, MI
-- Views do not represent those of my employer or school
------------------------------
Date: Fri, 29 May 1998 03:11:44 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Clearly define "free software"
Message-Id: <pudge-2805982306090001@dynamic265.ply.adelphia.net>
In article <u1hk9756c9l.fsf@buzzword-bingo.MIT.EDU>, tb@mit.edu (Thomas
Bushnell, n/BSG) wrote:
# Tom Christiansen <tchrist@mox.perl.com> writes:
#
# > Software must be written for Z=-3 to achieve
# > the desired 99.98% market saturation.
#
# But that's only true, of course, if you want massive market
# saturation. Bill Gate$ does, so his software is lousy (I think you're
# argument here is right on target). But it's also possible to have
# more modest goals of saturation, and then be quite satisfied with a
# different product.
Wanting total market saturation has nothing to do with whether or not you
will have a lousy product. There are great products out there for "dumb"
people. Accept it before it destroys you.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Fri, 29 May 1998 11:02:55 +0800
From: zhang yao <yzhang@suntze.com.sg>
To: Alan Fahrner <alan@protix.com>
Subject: Re: Compile Perl5.4 on AIX 4.2 with Gcc 2.8.0
Message-Id: <356E255E.B382B54E@suntze.com.sg>
If you are refering perl v5.00404, yes. I compiled it using gcc2.8.0 on aix
v4.2.1.0
I could email you the perl -V result if that is what you want
zhang
Alan Fahrner wrote:
> Hi All...
>
> Has anyone successfully compiled perl 5.4.4 on AIX 4.2 using the gcc 2.8.0
> compiler?
>
> I can get it to compile, but it then fails about 17% of the tests.
>
> On the surface, it appears that it is choking when it hits an "__END__"
> tag -- but not in every case (FileHandle.pm works if the __END__ tag is
> pulled out).
>
> I appreciate any suggestions on where I should go from here (any special
> config things you set, etc., etc. to make it work). Maybe a "perl -V" if
> possible on a successful compile?
>
> Thanks
>
> Alan
------------------------------
Date: Fri, 29 May 1998 03:14:00 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Copylefting manuals
Message-Id: <pudge-2805982308250001@dynamic265.ply.adelphia.net>
In article <Cjkb1.48$443.1394311@cam-news-reader1.bbnplanet.com>, Barry
Margolin <barmar@bbnplanet.com> wrote:
# In article <pudge-2805980950440001@dynamic265.ply.adelphia.net>,
# Chris Nandor <pudge@pobox.com> wrote:
# >I did not mean to imply that something is under patent without being
# >registered (although people have gone back and patented things that have
# >been in public use). I am just pointing out that if an example is
# >modified, there is a good chance it won't be considered copyright
# >infringement.
#
# If the example is modified, the result is a derived work, and still covered
# by the original author's copyright (as well as the modifier's copyright).
Copyright covers only the expression of an idea, not the idea itself.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Fri, 29 May 1998 10:53:15 +0800
From: Maria TheresiaWettstein <mariatw@pendragon.net>
Subject: cpu-lib.pl, fup.cgi
Message-Id: <356E231B.D4782CAE@pendragon.net>
I am looking for the above files. Does anyone know where I can get them?
Maria Theresia Wettstein
Pendragon Enterprises
******************************************************************
** Take a sneak preview for things to come!!!!!!!!!!!
** http://www.pendragon.net/classifieds
******************************************************************
** Visit http://www.pendragon.net
** for an overview of our site
******************************************************************
** Visit http://www.pendragon.net/comp
** for Web Design, Hosting and IT Services
******************************************************************
** Visit http://www.pendragon.net/healing
** for information about Online Reading and Healing Services
******************************************************************
** Visit http://www.pendragon.net/bb
** B&B in Western Australia (Riding lessons on site available)
******************************************************************
------------------------------
Date: 29 May 1998 03:12:47 GMT
From: ? the platypus {aka David Formosa} <dformosa@st.nepean.uws.edu.au>
Subject: Re: Don't Know how to decrypt using PERL
Message-Id: <896411558.555991@cabal>
In <1d9plpi.cto6hok4lup8N@slip166-72-108-10.ny.us.ibm.net> kpreid@ibm.net (Kevin Reid) writes:
>Kevin Buhr <buhr@stat.wisc.edu> wrote:
[...]
>> There is no known "easy"
>> way to recover a DES key from such a small sample of ciphertext, even
>> when you know the plaintext, like you do here.
>What is the purpose of the salt?
If two peaple have the same password, then it would be the same in the
encrypted password file. The salt tries to counteract this.
--
I'm a perl programer; if you need perl programing, hire me.
Please excuse my spelling as I suffer from agraphia; see the url. Support NoCeM
http://www.cit.nepean.uws.edu.au/~dformosa/Spelling.html http://www.cm.org/
I'm sorry but I just don't consider 'because its yucky' a convincing argument
------------------------------
Date: 29 May 1998 04:54:33 GMT
From: dha@panix.com (David Adler)
Subject: Re: Email address checker - comments welcome
Message-Id: <6klf29$36t@news1.panix.com>
On 28 May 1998 01:56:30 GMT, Eli the Bearded <*@qz.to> wrote:
>It is getting close to "end of May 1998", when is the script section of
>CPAN likely to reopen?
I seem to remember seeing somthing (from Kurt?) about that being RR(no,
really)SN.
--
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
"A Marine that says 'gee whiz'? What's he gonna do, storm the
Cunningham house?" - mst3k
------------------------------
Date: 29 May 1998 02:56:00 GMT
From: "Rafkin" <Rafkin@Hotmail.com>
Subject: Re: HELP!!!!!!
Message-Id: <01bd8aac$c44f9600$5e584dd1@donald>
Tom Phoenix <rootbeer@teleport.com> wrote in article
<Pine.GSO.3.96.980528194021.3419F-100000@user2.teleport.com>...
> On 29 May 1998, Rafkin wrote:
>
Sorry, you're right, i could have picked a better subject line..
Your answer seems to suggest that I can install Perl on a windows 95
machine
without a server, for the purpose of debugging.. if this is true, how would
i pass the attributes to it to test it, and find out what's not working
etc??
i'm writting these scripts in notepad, with only a couple tutorials and
faq's to help me with the basics.. I can then go download Perl? for win95?
------------------------------
Date: Fri, 29 May 1998 04:43:49 GMT
From: spambait@dragon.erupt.com (Eliot)
Subject: How do I pass multiple parameters to a cgi script from the browser?
Message-Id: <92rb1.1650$Y2.2459711@news2.atl.bellsouth.net>
I've been hacking at a Perl script for awhile now, and I can't figure
out how to pass two parameters to the script at once, i.e.,:
http://my.domain.com/cgi-bin/script.pl?param1
and
http://my.domain.com/cgi-bin/script.pl?param1¶m2
do the same thing. I can't figure out how to make the script read both
variables. Any help would be appreciated.
------------------------------
Date: 29 May 1998 09:05:26 +0930
From: Martin Gregory <mgregory@asc.sps.mot.com>
Subject: Re: perl's idea of version numbers
Message-Id: <r8soluc6kh.fsf@asc.sps.mot.com>
Tom Christiansen <tchrist@mox.perl.com> writes:
> In comp.lang.perl.misc, Martin Gregory <mgregory@asc.sps.mot.com> writes:
> :I found this message suprising:
> : rtmx version 1.3 required--this is only version 1.24 at /home/eda/app/share/bin/rtmx line 373.
> :
> :Is perl reading "1.24" as "version 1.2.4". I read it as "one - twenty four".
> :Any comments? Is this a bug?
>
> Numbers are numbers. Think of it as dollars and cents. $1.3 is really
> a buck thirty, whereas $1.24 is still a penny shy of ten bits, and
> certainly less than $1.30 no matter how you look at it -- numerically.
>
> Or were you planning on introducing different lexical contexts
> for discerning numbers from versions? I don't thinks so.
>
> There's a reason we write versions as %.3f or better, you know.
This is an interesting, and internally consistent, definition of what
a version number is.
It is a real shame that it does not match the definition used by most
conventional Version Control tools.
For example, both RCS and Clearcase consider a version number to be
composed of two numbers, a major revision and a minor revision, which
are separated by a period.
It is a real shame that perl does not share this definition, because
it renders the otherwise very nice:
package Frog;
use vars qw($VERSION);
( $VERSION ) = '$Revision: 1.27 $ ' =~ /\$Revision:\s+([^\s]+)/;
totally useless.
The intent of this is to capture the RCS/Clearcase version number -
which is automatically updated upon checkin - into the VERSION of a
module. With perl's current interpretation of version, this breaks.
:-(
Martin.
------------------------------
Date: 29 May 1998 03:18:25 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: perl's idea of version numbers
Message-Id: <6kl9e1$r5j$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, Martin Gregory <mgregory@asc.sps.mot.com> writes:
:This is an interesting, and internally consistent, definition of what
:a version number is.
We aim to please.
:It is a real shame that it does not match the definition used by most
:conventional Version Control tools.
Did you read what I wrote about this in perlmod?
# the must be all one line if you're using MakeMaker
$VERSION = do { my @r = (q$Revision: 2.21 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
--tom
--
"I'd rather have :rofix than const."
--Dennis Ritchie
------------------------------
Date: Fri, 29 May 1998 03:43:50 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: perl's idea of version numbers
Message-Id: <Pine.GSO.3.96.980528202838.3419J-100000@user2.teleport.com>
On 29 May 1998, Martin Gregory wrote:
> For example, both RCS and Clearcase consider a version number to be
> composed of two numbers, a major revision and a minor revision, which
> are separated by a period.
>
> It is a real shame that perl does not share this definition,
> ( $VERSION ) = '$Revision: 1.27 $ ' =~ /\$Revision:\s+([^\s]+)/;
I'm trying to be as open-minded as possible, but it's difficult.
Please forgive me if I've misunderstood your intentions here.
Now, as I understand it, you would want Perl to see that 1.3 should
_preceed_ 1.27. Is that right? And 1.30 follows 1.27? How should Perl
realize that you're wanting that? Maybe you should write code something
like this to make Perl (and anyone who reads your code) know what you're
really doing.
$VERSION = sprintf "%d.%03d", ('$Revision: 1.27 $ ' =~
/\$Revision:\s+(\d+)\.(\d+)/);
Again, I'm not trying to stomp on your ideas - but I can't see how Perl
could do numeric comparisons any differently than it does without causing
terrible confusion. Thanks!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 28 May 1998 23:21:16 -0400
From: Seth Allen <seth95@patriot.net>
Subject: perlscript book
Message-Id: <356E29AC.4D9FDA12@patriot.net>
Does anyone know of a book on Perlscript? How about a book with a
chapter on Perlscript?
------------------------------
Date: 29 May 1998 03:21:02 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: perlscript book
Message-Id: <6kl9iu$fhh@fridge.shore.net>
Seth Allen (seth95@patriot.net) wrote:
: Does anyone know of a book on Perlscript? How about a book with a
: chapter on Perlscript?
Perl in a Nutshell will have a chapter about Perlscript if I'm
correct.
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: Thu, 28 May 1998 20:01:06 -0700
From: Krutibas Biswal <krutibas.biswal@sun.com>
Subject: Question on Text Widget Update
Message-Id: <356E24F2.72ED3DCE@sun.com>
I am forking a program from a perl script and I want to send
the output of the program to a text widget (already created with
scroll bar). I am having a hard time synchronizing the output
of the program to the text widget. Any ideas how to do this in
a better way ? Here is what I have done. RunProg is the program
which output should go to the Text Widget $logText.
... <code to create main window and stuff...>
$logText = $root->Text (-borderwidth => '1', -height => '1', -width =>
'1' );
$textScroll = $root->Scrollbar( -borderwidth => '1',-relief => 'flat');
$logText->configure(-yscrollcommand => ['set', $textScroll]);
$textScroll->configure( -command => ['yview', $logText] );
FORK: {
if ( $child = fork ) {
## Parent Does nothing
} elsif (defined $child) {
open TEXTF, "RunProg |";
while(<TEXTF>) {
$logText->insert(end, $_);
}
close(TEXTF);
} elsif ($! =~ /No more process/) {
sleep 5;
redo FORK;
} else {
die "Can't fork: $!\n";
}
}
Thanks for your help.
Regards,
Krutibas Biswal
------------------------------
Date: 29 May 1998 04:40:06 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: read and write
Message-Id: <6kle76$jp1$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Zenin
<zenin@bawdycaste.org>],
who wrote in article <896401525.463770@thrush.omix.com>:
> Ilya Zakharevich <ilya@math.ohio-state.edu> wrote:
> >snip<
> : It would test true at EOF. It is just that it will not signal EOF on
> : the first iteration.
>
> But once again, you're at EOF so to not signal EOF would be an
> error.
>
> If you're standing at the edge of a cliff with a blind
> fold on and ask someone if it's safe to take a step forward,
> you'd hope they say "no" the first time, not the second.
I'm afraid your analogy has some impendance mismatch. Unless you can
step ahead 0 bytes.
> : Zenin wrote
> : > There is no such thing as an "empty read()", except of course at
> : > EOF. Read() is guaranteed not to pull that kind of cheap trick
> : > on you, at least not when talking about normal files. :-)
> :
> : *This* is an argument. But this limitation of C looks
> : counter-intuitive to me when I think Perl.
>
> This isn't a limitation of C, it's a feature. It's a feature
> that says if I'm at EOF that the system is not going to lie
> about it to laugh at me as I plumet to my death off a 500 foot
> cliff.
See above.
Hope this helps,
Ilya
------------------------------
Date: Fri, 29 May 1998 03:15:57 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <pudge-2805982310230001@dynamic265.ply.adelphia.net>
In article <6kklre$e3q$5@info.uah.edu>, Greg Bacon <gbacon@cs.uah.edu> wrote:
# In article <pudge-2805981533440001@dynamic265.ply.adelphia.net>,
# pudge@pobox.com (Chris Nandor) writes:
# : Advocacy issues do not belong on clp.moderated. Any arguments about free
# : vs. free belongs on clp.misc if anywhere, not clp.moderated.
#
# I've reread Tom's article, and I don't believe that it was primarily an
# advocacy post (although when anyone dares to speak out against the FSF,
# it usually results in an ugly flame war).
#
# This is a quote from the recently posted RFD:
#
# The moderators will decide which posts are of general interest to
# the worldwide Perl community.
#
# I believe the issue Tom brought to the table was of interest to the Perl
# community. Further, I think had it been posted to a moderated group,
# the flamefest might have been easier to control.
I respectfully disagree. I think that possibly a post of notice ("here is
what the FSF page says") might be on topic, so maybe the original post
was; but further discussion of the matter, IMO, would not have been.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 29 May 1998 02:17:16 GMT
From: lindahl@pbm.com (Greg Lindahl)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <6kl5rc$h9b@news1.newsguy.com>
Tom Christiansen <tchrist@mox.perl.com> writes:
> Read my words, Mr. Greg Lindahl. Either one of two things is true:
>
> The page was written back when only the 1st Camel
> and no split-up manpages existed.
>
> The page was written recently when split-up
> manpages do exist.
And that justifies you starting a huge cross-posted flamewar?
> In the first case, the FSF's statement that "the books' authors
> are withholding them from our community" is a way to insult Larry,
I don't see Larry starting huge cross-posted flamewars... and I know
he can defend himself. Same for merlyn.
> In the second case, the page was written in either willful disregard or
> surprising ignorance of the 1,000-page free book that already exists,
.. which may not meet the FSF definition for free.
So in both cases you don't seem justified doing more then sending
some email to the FSF. Not starting one of the largest, dumbest
cross-posted flamewars in recent history.
Next time you get mad, send a little email.
> Since you seem to be so in with the FSF,
I am not "in" with the FSF at all. This isn't Perl vs. the FSF, this
is you vs. your ego. Think of all the work that could have been done
on Perl instead.
-- g
------------------------------
Date: 29 May 1998 03:50:32 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <6klba8$3sg$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
lindahl@pbm.com (Greg Lindahl) writes:
:> Read my words, Mr. Greg Lindahl. Either one of two things is true:
:>
:> The page was written back when only the 1st Camel
:> and no split-up manpages existed.
:>
:> The page was written recently when split-up
:> manpages do exist.
:
:And that justifies you starting a huge cross-posted flamewar?
It certainly justfies complaining. That their Faithful responded
to the complaint with nuclear blasters is not something you can
hold me responsible for.
And for the record, I *did* send mail. It remains unanswered.
--tom
--
There is no problem so small that it can't be blamed on Datakit --Andrew Hume
------------------------------
Date: 29 May 1998 04:07:23 GMT
From: lindahl@pbm.com (Greg Lindahl)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <6klc9r$n1l@news1.newsguy.com>
Tom Christiansen <tchrist@mox.perl.com> writes:
> :And that justifies you starting a huge cross-posted flamewar?
>
> It certainly justfies complaining. That their Faithful responded
> to the complaint with nuclear blasters is not something you can
> hold me responsible for.
You yelled fire in a crowded theater, a cross-posted one at that.
And it wasn't "their Faithful" who responded. Why do you like this "us
vs. them" mentality so much?
-- g
------------------------------
Date: Fri, 29 May 1998 02:17:18 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Two output messages from script
Message-Id: <Pine.GSO.3.96.980528190955.3419B-100000@user2.teleport.com>
On Thu, 28 May 1998, Tasha van Es wrote:
> I've got a script for which I haven't figured out the following perl
> complaint. The script runs perfectly, incidently. The message I am
> getting is:
>
> Use of uninitialized value at srun line 210, <REQLIC> chunk 52.
When Perl gives you an unfamiliar error or diagnostic message, the
perldiag manpage will have a more-detailed explanation.
> open(REQLIC, ">$file.$pid");
Even when your script is "just an example" (and perhaps especially in that
case!) you should _always_ check the return value after opening a file. In
this case, if the open fails, it would be good for your code to give
an error message which would contain the values of $file and $pid, as well
as the magical $! variable, which will contain a human-readable string
such as 'file not found' or 'permission denied'.
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 29 May 1998 03:37:57 GMT
From: waulok(at)trust-me.com (Jason Oakley)
Subject: Re: Two output messages from script
Message-Id: <356e2d60.3763252@news.comcen.com.au>
On Thu, 28 May 1998 21:48:07 +0000, Tasha van Es <vanes@raptor.com>
wrote:
>Hi -
>
>I've got a script for which I haven't figured out the following perl
>complaint. The script runs perfectly, incidently. The message I am
>getting is:
>
>Use of uninitialized value at srun line 210, <REQLIC> chunk 52.
>
>Here's the initialization I use:
>
>open(REQLIC, ">$file.$pid");
Presumably, you haven't initialised the variable at the start of your
script. Either use $file="" or $pid=""
------------------------------
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 2757
**************************************
