[10081] in Perl-Users-Digest
Perl-Users Digest, Issue: 3674 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Sep 9 23:08:08 1998
Date: Wed, 9 Sep 98 20:00:18 -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 Wed, 9 Sep 1998 Volume: 8 Number: 3674
Today's topics:
Re: Array References and Function return values <jdf@pobox.com>
Building Perl (Don Krause)
Re: Cache flow <efinch@cais.com>
Re: eof check on output stream <jdf@pobox.com>
Re: History of Perl - round 1 <elaine@cts.wustl.edu>
Re: History of Perl - round 1 <eashton@bbnplanet.com>
Re: History of Perl - round 1 <eashton@bbnplanet.com>
Re: History of Perl - round 1 (Abigail)
Re: How do I extract last line from multiline string? (Charles DeRykus)
Re: IO::File Permissions - Enlightened! <sneaker@sneex.fccj.org>
Re: learning perl......... (Andrew M. Langmead)
Re: Looking for a programm in Perl!:=) (Andre L.)
Re: Off topic, but ... [Was Re: Perl & Java - differenc <uri@sysarch.com>
Re: Off topic, but ... [Was Re: Perl & Java - differenc <elaine@cts.wustl.edu>
Re: Off topic, but ... [Was Re: Perl & Java - differenc <ajohnson@gpu.srv.ualberta.ca>
Pearl5 COMPLETE - problem with suggested code (Ralph Brands)
Re: Perl & Java - differences and uses <borg@imaginary.com>
Re: Perl Data Structures: trees etc... (Mark-Jason Dominus)
Re: Perl gurus opinion needed. <elaine@cts.wustl.edu>
Re: QUESTIONS (was: Perl Programmer Needed) (Andre L.)
Re: QUESTIONS (was: Perl Programmer Needed) (Faust Gertz)
regexp question - loop until line NOT having an exp <NOTHANKStbeaulieu@mediaone.net>
Re: Regular Expression - substitution from lower to upp <NOTHANKStbeaulieu@mediaone.net>
Re: Use of 'exit' in child process (Andrew M. Langmead)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 10 Sep 1998 04:26:13 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: <jari.aalto@poboxes.com> (Jari Aalto+maile.perl)
Subject: Re: Array References and Function return values
Message-Id: <m3lnnszosa.fsf@joshua.panix.com>
<jari.aalto@poboxes.com> (Jari Aalto+maile.perl) writes:
> Then How do convert function that currenly uses multiple
> arrays and return one big array back
By using the anonymous array ref constructor:
return [@ary1, @ary2, @ary3];
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Wed, 9 Sep 1998 19:37:09 -0700
From: dkrause@gte.net (Don Krause)
Subject: Building Perl
Message-Id: <6t7drb$hbp$1@news-2.news.gte.net>
I'm trying to build perl 5.004_4 on RedHat 4.2.
[dkrause@weatherman perl5.004_04]$ make
cc -L/usr/local/lib -o miniperl miniperlmain.o libperl.a -lndbm -lgdbm -
ldb -l
libperl.a(pp_hot.o): In function `Perl_pp_aassign':
pp_hot.o(.text+0x1532): undefined reference to `setresgid'
make: *** [miniperl] Error 1
I'm lost, can someone point me to the library I'm missing?
=Don=
------------------------------
Date: Wed, 09 Sep 1998 21:15:45 -0400
From: Ed Finch <efinch@cais.com>
Subject: Re: Cache flow
Message-Id: <35F72840.DF30B5F7@cais.com>
Michal Franc wrote:
> Anyone knows what is CashFlow?
> I get this http_user_agent response
> Mozilla/3.01 (compatible; CacheFlow-Cache/1.1 - 10887.P)
>
> Thanks
CacheFlow is a company that makes dedicated web-caching
boxes. We demo'd one for a few months but sent it back.
My understanding is that they haven't sold ANY boxes,
despite "in use at <company>" claims they make, so
caveat emptor.
Ed
------------------------------
Date: 10 Sep 1998 04:21:41 +0200
From: Jonathan Feinberg <jdf@pobox.com>
To: "Doug Azzarito" <Doug_Azzarito@dell.com>
Subject: Re: eof check on output stream
Message-Id: <m3ogsozozu.fsf@joshua.panix.com>
"Doug Azzarito" <Doug_Azzarito@dell.com> writes:
> open (TEST, '>junk.txt');
> print TEST "Start.....";
> if (eof(TEST)) {
It doesn't make any sense to ask whether a write-only filehandle is at
end-of-file. eof() asks "is there anything left to read from a given
filehandle?". What are you trying to do?
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Wed, 9 Sep 1998 20:19:58 -0500
From: elaine ashton <elaine@cts.wustl.edu>
To: David Adler <dha@panix.com>
Subject: Re: History of Perl - round 1
Message-Id: <Pine.SOL.3.96.980909201850.1903F-100000@helen.cts.wustl.edu>
> Ok, come up with a different title! Eek. Perl deserves better
> (certainly more entertaining).
It is a thesis darling. Not a title. :)
------------------------------
Date: Thu, 10 Sep 1998 01:26:55 GMT
From: Elaine -HappyFunBall- Ashton <eashton@bbnplanet.com>
Subject: Re: History of Perl - round 1
Message-Id: <35F72883.16B9AE95@bbnplanet.com>
David Adler wrote:
> If it makes you feel any better, there are a *lot* of people out there
> that will give up on capital letters to save typing.
Well, actually, having been a UNIX dork for the last oh-so-many aeons, I
like not having to reach for that damn 'Shift' key. I generally type
from a stream of consciousness (or lack thereof) so I could really care
less about a capital letter here or there. I spell correctly but noone
seems to note that. ;) I got so many notes about this whole matter
though, that in deference to the visually impared, I have started to
type with capitals. It's annoying, but I'll deal. Stop mailing me you
ninnies!
Having an not quite so calgon day.
*grrr*
e.
------------------------------
Date: Thu, 10 Sep 1998 01:30:40 GMT
From: Elaine -HappyFunBall- Ashton <eashton@bbnplanet.com>
Subject: Re: History of Perl - round 1
Message-Id: <35F72964.5CA3F75F@bbnplanet.com>
> I'm not the only one amused, surely? :-)
*yawn* probably. ;)
> "It's all in the mind." - Madness
Yes, yes it is. Whatever happened to them anyway. I remember seeing them
in this cool little London pub in the early 80s. *sigh*
e.
------------------------------
Date: 10 Sep 1998 02:36:15 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: History of Perl - round 1
Message-Id: <6t7duv$r6c$1@client3.news.psi.net>
David Adler (dha@panix.com) wrote on MDCCCXXXV September MCMXCIII in
<URL: news:6t71el$k43@news1.panix.com>:
++ On 6 Sep 1998 02:21:56 GMT, Abigail <abigail@fnx.com> wrote:
++ >Capitals, proper punctuation, spelling, and grammar makes text easier
++ >to read. But, if you want to limit your audience, don't bother with those.
++
++ An then, following that "easier to read" comment,
++
++ >perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
++ > for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
++ > print chr 0x$& and q
++ > qq}*excess********}'
++
++ I'm not the only one amused, surely? :-)
That program is for a limited audience only.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=new Math::BigInt+qq;$^F$^W783$[$%9889$^F47$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W98$^F76777$=56;;$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: Thu, 10 Sep 1998 01:42:18 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: How do I extract last line from multiline string?
Message-Id: <Ez1oqI.LuG@news.boeing.com>
In article <MPG.105f37334dde4ccc98979a@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
>[Posted to comp.lang.perl.misc and a copy mailed.]
>
> ...
>In regard to Charles DeRykus's observation, I agree that
>
> $x =~ s/\n([^\n]*)\n$//;
>
>and
>
> $x =~ s/\n(.*)\n$//;
>
>work the same, because by default '.' and '[^\n]' are synonymous. As for
>speed, the '.' form is indeed about 5% faster by my Benchmarks, not that
>it is likely to matter in any real program. I'm not sure why it is
>faster, and I wonder how Charles predicted that without measurement.
Actually I did benchmark but the results didn't seem
particularly noteworthy - just enough for an assertion
that "." was often faster. The edge got bigger as the
length of the subexpression grew though.
--
Charles DeRykus
------------------------------
Date: Wed, 09 Sep 1998 22:32:30 -0400
From: Bill 'Sneex' Jones <sneaker@sneex.fccj.org>
To: Ronald J Kimball <rjk@coos.dartmouth.edu>
Subject: Re: IO::File Permissions - Enlightened!
Message-Id: <35F73A3E.78D80079@sneex.fccj.org>
Ronald J Kimball wrote:
>
> [ A copy of this message has been posted to the newsgroup ]
> [ comp.lang.perl.misc ]
>
Ditto :]
>
> Here, we see that if MODE *is* numeric, IO::FILE::open() calls sysopen,
> with the PERMS argument, and returns the result.
>
> my $fh = new IO::File $file, O_WRONLY|O_APPEND, 0600;
>
First of all allow me to thank you for helping
clear things up :]
However, when you say mode, do you mean perms?
Anyways, I can use POSIX; and the following should work:
#!/usr/bin/perl -w
use strict;
use diagnostics;
use POSIX;
use IO;
# Get the date in the format of 'Sun Sep 6 18:04:46 1998'
my $ltDate = localtime;
# Now get the Serialized Date, and string'em back together...
my ($seconds, $minutes, $hour, $monthDate, $month,
$year, $weekDay, $yearDate, $daylightSavings) = localtime;
my $ltSerial =
"$seconds$minutes$hour$monthDate$month$year$weekDay$yearDate$daylightSavings";
my $file = "test.File";
my $fh = new IO::File $file, O_WRONLY|O_APPEND|O_CREAT, 0600;
# Create secialized security marker:
if (defined $fh) {
print $fh "$ltSerial|$ltSerial|$ltDate\n";
undef $fh;
} else { print "Oops! $!"; }
autoflush STDOUT 1;
And, as testing it shows, it works wonderfully :]
As a side note, when you say 'tsk tsk tsk', is that bad?
Is my syntax all that terrible?
Also, if I remember correctly from my C days millions
of years ago, I could have sworn that O_APPEND implied
create if it does not exist, and writing was implied as well.
I do appreciate your help :]
-Sneex-
__________________________________________________________________
Bill Jones | FCCJ Webmaster | http://webmaster.fccj.org/Webmaster
__________________________________________________________________
It is common sense to take a method and try it. If it fails,
admit it frankly and try another. But above all, try something.
-- Franklin D. Roosevelt
------------------------------
Date: Thu, 10 Sep 1998 01:08:16 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: learning perl.........
Message-Id: <Ez1n5t.2D8@world.std.com>
Jaime Diaz <jamdiaz@klaskycsupo.com> writes:
>I tried using split to create fields, but the split(//): only takes one
>space into account...How can I parse fields with various number spaces
>in between....
Since the first argument to split can be any kind of regex, just make
it one that will match any number of spaces.
split /\s+/;
You might want to also look at the third parmeter to split, which is
the maximum number of fields to split, just in case any of the
filenames contain spaces.
split /\s+/, $_, 2;
For some added magic, perl allows the first parameter to be a single
space character ' ', and it will remove leading whitespace first.
Of course, all of this is explained in the perlfunc man page.
--
Andrew Langmead
------------------------------
Date: Wed, 09 Sep 1998 21:26:42 -0500
From: alecler@cam.org (Andre L.)
Subject: Re: Looking for a programm in Perl!:=)
Message-Id: <alecler-0909982126420001@dialup-366.hip.cam.org>
In article <35F68DD8.2F355C2B@wanadoo.fr>, Plate Forme Jeunes Diplomes
<plateforme@wanadoo.fr> wrote:
> That is that I have ever wrote, and now, I can't do anything.
>
> The loop doesn't work.
>
> The searchnig string doesn't work.
>
> The print doesn't work...
>
> I am going to be mad!!!
>
> Fred
OK, we have the program, but what does the data file look like? It might
be useful to compare your matching regexp with the actual text to be
searched.
Salut,
Andre
------------------------------
Date: 09 Sep 1998 21:37:35 -0400
From: Uri Guttman <uri@sysarch.com>
To: Randal Schwartz <merlyn@stonehenge.com>
Subject: Re: Off topic, but ... [Was Re: Perl & Java - differences and uses]
Message-Id: <x7r9xkzr1c.fsf@sysarch.com>
>>>>> "RS" == Randal Schwartz <merlyn@stonehenge.com> writes:
>>>>> "I" == I R A Aggie <fl_aggie@thepentagon.com> writes:
RS> Listen up californians... you think el nino was bad?
RS> It's like that EVERY YEAR here. We laugh at your few extra days
RS> of rain. It's like that ALL THE TIME in OREGON.
RS> Last year in Oregon, Summer fell on a *tuesday*. That was it.
RS> One day. Big shiny thing in the sky. Some people thought it was
RS> a UFO. And Oregonians don't tan in the summer... they *rust*.
RS> Just another native Oregonian (wink),
stop whining and leave the state which convicted you! :-)
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire ---------------------- Perl, Internet, UNIX Consulting
uri@sysarch.com ------------------------------------ http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Wed, 9 Sep 1998 20:55:27 -0500
From: elaine ashton <elaine@cts.wustl.edu>
To: Randal Schwartz <merlyn@stonehenge.com>
Subject: Re: Off topic, but ... [Was Re: Perl & Java - differences and uses]
Message-Id: <Pine.SOL.3.96.980909204804.1903I-100000@helen.cts.wustl.edu>
> Listen up californians...
> you think el nino was bad?
Has oregon given up on stoning the Californians? Never mind the rain,
rocks hurt. :) I witnessed that in downtown Portland once, very odd.
> It's like that EVERY YEAR here. We laugh at your few extra
> days of rain. It's like that ALL THE TIME in OREGON.
Oh, I think you exaggerate. The Rose Festival in May is rainy whereupon
they spray vanilla onto the mud to make it weird musty mud (never figured
that one out). The summer is lovely and October brings the rain back. Of
course, this years weather pattern is a bit out of the ordinary. Isn't it
'la nina' now? Just be glad you aren't in the Midwest...90+ and 85%+
humidity. If you want great weather to the point of being maddeningly so,
head for the Caribbean.
> Last year in Oregon, Summer fell on a *tuesday*. That was it. One
> day. Big shiny thing in the sky. Some people thought it was a UFO.
> And Oregonians don't tan in the summer... they *rust*.
And I'm sure the Oregonian reporter was right on top of it too. And
Oregonians don't rust as that is a Boston sort of thing (my car proves
it), they grow moss. :)
e.
------------------------------
Date: Wed, 09 Sep 1998 21:38:40 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: Off topic, but ... [Was Re: Perl & Java - differences and uses]
Message-Id: <35F73BB0.50E6CB44@gpu.srv.ualberta.ca>
Randal Schwartz wrote:
[snip]
>
> Last year in Oregon, Summer fell on a *tuesday*. That was it. One
you get summer there??
andrew
------------------------------
Date: 10 Sep 1998 02:31:26 GMT
From: brinton@unixg.ubc.ca (Ralph Brands)
Subject: Pearl5 COMPLETE - problem with suggested code
Message-Id: <brinton-0909971923040001@p043.intchg3.net.ubc.ca>
Could someone please suggest if there is some misprint or missing
line in Listing 8.6 "printAoA2.p" on page 246 of Pearl5 COMPLETE that I've
missed? I've included it below as "sub printAoA". Adding the line shown
seems to make it work for me, but I wonder if something else is obviously
missing. Their listing 8.4 which is used below and is sub
makeArrayOfArrays4.p on page 244 had a missing line ("chomp(@lines =
<$fd>"...).
Many thanks,
Ralph Brands
#!usr/bin/perl;
use FileHandle;
$test = makeArrayOfArrays('C:Desktop Folder:my_data_file', {IGNORE => [0],
DELIM => "|"});
printAoA($test, {DELIM => '|'});
sub printAoA
{
my ($AoA, $config) = @_;
my ($return);
local($") = $config->{DELIM} if ($config->{DELIM});
foreach $arrayref (@$AoA)
{
my $scalar = "@$arrayref\n";
# print "$scalar"; #adding this line seems to make it work?
$return .= $scalar;
}
$scalar;
}
sub makeArrayOfArrays
{
my ($file,$config) = @_;
my $return = [];
my (@lines);
my $fd = new FileHandle("$file") || die "Couldn't open $file\n";
chomp(@lines = <$fd>);
foreach $line (@lines)
{
push(@$return, getArrayRef($line, $config));
}
return($return);
}
sub getArrayRef
{
my ($line, $config) = @_;
my @return;
my $ignoreElements = $config->{IGNORE} || [];
my @elements = split(m"\|", $line);
foreach (@elements)
{ push(@return, $_) if (!grep($_ == $yy, $ignoreElements)); }
return([ @return ] );
}
------------------------------
Date: Thu, 10 Sep 1998 00:55:53 GMT
From: George Reese <borg@imaginary.com>
Subject: Re: Perl & Java - differences and uses
Message-Id: <tsFJ1.545$E9.1882388@ptah.visi.com>
In comp.lang.java.programmer Jon Bell <jtbell@presby.edu> wrote:
: In article <35ed93c2.0@news.netcom.co.uk>, Jim <-> wrote:
:>I was originally only going to ask clpm but didn't want a biased opinion,
:>thats also why I asked for references to info. We're all big boys, I'm sure
:>we can discuss these things maturely, isn't that what usenet is all about?
: Unfortunately, choice of programming language, for many people, is like
: choice of religion. And how many people can discuss religion in a mature
: fashion? :-)
This is a fallacy. Religion cannot be discussed rationally because
religious backers tend to fall back on positions outside of logic to
support their claims. Languages, on the other hand, can be compared on
their merits. I have never heard anyone argue that Perl must be the
best language since if you look at the world you can see Perl in every
tree and blade of grass.
--
George Reese (borg@imaginary.com) http://www.imaginary.com/~borg
PGP Key: http://www.imaginary.com/servlet/Finger?user=borg&verbose=yes
"Keep Ted Turner and his goddamned Crayolas away from my movie."
-Orson Welles
------------------------------
Date: 9 Sep 1998 22:07:31 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Perl Data Structures: trees etc...
Message-Id: <6t7c93$o4g$1@monet.op.net>
In article <6t72bl$qes$1@godzilla.zeta.org.au>,
David Formosa <dformosa@zeta.org.au> wrote:
>Hierarchically nested hashes are trees.
So they are. But they're trees in an awfully funny way.
------------------------------
Date: Wed, 9 Sep 1998 20:43:39 -0500
From: elaine ashton <elaine@cts.wustl.edu>
To: David Adler <dha@panix.com>
Subject: Re: Perl gurus opinion needed.
Message-Id: <Pine.SOL.3.96.980909203648.1903H-100000@helen.cts.wustl.edu>
> Aw, you left mine out: Certified Perl Druid!
Dang, I almost put that in my list! Would have fit perfectly with the
whole 'Renaissance folks who love to list stuff' thing. Slightly
remeniscent of 'Gargantua and Pantagruel'. The Druids would have loved
Perl. We should do a Gregorian Chant out of Perl. Though, without Latin,
it will lack a certain flair and rhyme. Perhaps a Perl through the ages in
rhyme, metre, literature and gregorian chant. Imagine Shakespeare in
Perl....probably a lot more readable.
if $you eq "Summer's Day" {
then
print "Thou art more lovely and more beautiful\n";
ok, I've obviously had too much beer....
e.
------------------------------
Date: Wed, 09 Sep 1998 21:02:29 -0500
From: alecler@cam.org (Andre L.)
Subject: Re: QUESTIONS (was: Perl Programmer Needed)
Message-Id: <alecler-0909982102290001@dialup-366.hip.cam.org>
In article <1df3s6u.ygpmbb192ze6mN@bay1-161.quincy.ziplink.net>,
rjk@coos.dartmouth.edu (Ronald J Kimball) wrote:
> Patrick Timmins <ptimmins@netserv.unmc.edu> wrote:
>
> > help me out quick buds ...
> > [etc.]
>
> *rofl*
>
> That was hilarious! Although it was rather frightening that several
> people responded apparently unaware that it was in jest. Some people
> just don't understand satire.
It's obviously a joke. The lack of capitals gives it away. :-)
Andre
------------------------------
Date: Thu, 10 Sep 1998 01:53:01 GMT
From: faust@wwa.com (Faust Gertz)
Subject: Re: QUESTIONS (was: Perl Programmer Needed)
Message-Id: <35f72fb5.26716410@news.wwa.com>
On Wed, 09 Sep 1998 21:02:29 -0500, alecler@cam.org (Andre L.) wrote:
>It's obviously a joke. The lack of capitals gives it away. :-)
Obviously. A serious offer would be composed in all caps.
Faust
------------------------------
Date: Wed, 9 Sep 1998 22:15:17 -0400
From: "Todd B" <NOTHANKStbeaulieu@mediaone.net>
Subject: regexp question - loop until line NOT having an exp
Message-Id: <6t7cq5$km2$1@wbnws01.ne.highway1.com>
could someone please help me on a small problem i am having? i am trying to
extract a block of text from a file, between two markers. i then want to
replace stuff inside the extracted string, in a loop. the extracted string
is a table row, so whatever the formatting from the template, i will repeat
it n times, once for each record, replacing the field label and data with
each iteration. this is what i have so far:
while (<TEMPLATE> && ! (/\<!-- MARKER:END FIELD ROW --\>/i)) {
tb::debug_print "EVAL: $_";
$sBlock .= $_;
}
$sTemp = $sBlock;
>> this part would loop, but i can handle that:
$sTemp =~ s/\<!-- CONTENT:FIELD NAME --\>/LABELHERE:/i;
$sTemp =~ s/\<!-- CONTENT:FIELD DATA --\>/DATAHERE/i;
i can't figure out how to make the first loop go while there is data, AND
UNTIL it hits the end marker. i have tried a bunch of things, but the
results range from not working, to wiping the $_ var. for example, i tried
" && $_ !~ /...." but that wipes $_.
any help would be appreciated.
------------------------------
Date: Wed, 9 Sep 1998 22:18:21 -0400
From: "Todd B" <NOTHANKStbeaulieu@mediaone.net>
Subject: Re: Regular Expression - substitution from lower to upper case...how?
Message-Id: <6t7cvs$ksa$1@wbnws01.ne.highway1.com>
use the tr command.
i believe the syntax would be tr/a-z/A-z/
you can research the rest.
------------------------------
Date: Thu, 10 Sep 1998 01:24:20 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: Use of 'exit' in child process
Message-Id: <Ez1nwK.A1M@world.std.com>
"Chris N. Hinds" <chris.hinds@arm.com> writes:
>Why are the outputs of the kill 0 both 1 when the process
>has exited?
A process still exists until it has been wait()ed for by its
parent. (Although maybe as a zombie process)
If you put a wait() after the kill(), it may return 0. (And if it
doesn't that means that the PIDs have wrapped around and been used by
another process. This means that you have a *very* fast and *very*
busy machine.)
Have you taken a look at waitpid()? It seems to be the more
apropropriate function to determine what is going on with your child
process. (You can specify the PID of th eprocess you are interested
in, and you can use WNOHANG to test if it is running without blocking)
You might also want to take a look at a book like "Advanced Unix
Programming" <URL:http://cseng.aw.com/bookdetail.qry?
ISBN=0-201-56317-7&ptype=1090> for a good explanation on the Unix
process environment.
--
Andrew Langmead
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 3674
**************************************
