[15961] in Perl-Users-Digest
Perl-Users Digest, Issue: 3373 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 15 14:10:58 2000
Date: Thu, 15 Jun 2000 11:10:34 -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: <961092633-v9-i3373@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 15 Jun 2000 Volume: 9 Number: 3373
Today's topics:
Does anyone have some exercises? (E.C.vEersel)
Re: evaluating expressions <red_orc@my-deja.com>
Re: evaluating expressions (Craig Berry)
Exporting tlars@my-deja.com
Re: Exporting <rootbeer@redcat.com>
Re: Extracting Data From a File with Separate Sections nobull@mail.com
Re: Extracting Data From a File with Separate Sections <lr@hpl.hp.com>
Form <tekahera@my-deja.com>
Re: Form <red_orc@my-deja.com>
help: split pattern andrew_ef@my-deja.com
Re: help: split pattern <red_orc@my-deja.com>
Re: help: split pattern <care227@attglobal.net>
Re: help: split pattern andrew_ef@my-deja.com
Re: Hotmail/E-mail/HTML Question <Peter.Dintelmann@dresdner-bank.com>
Re: how do I "redirect" a substitution? nobull@mail.com
Re: how do I "redirect" a substitution? (Craig Berry)
Re: how to setuid and setgid <dominic01@hotmail.com>
Re: how to setuid and setgid <care227@attglobal.net>
Re: Infinity ? <julien.quint@xrce.xerox.com>
Re: Infinity ? (Ilya Zakharevich)
Re: Infinity ? <julien.quint@xrce.xerox.com>
Re: Infinity ? <iltzu@sci.invalid>
Re: Larry Rosler interview on perl.com! (Abigail)
Re: Larry Rosler interview on perl.com! lvirden@cas.org
Re: Larry Rosler interview on perl.com! lvirden@cas.org
Re: Need perl code to do OS baselining <ts@relson.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 15 Jun 2000 17:42:32 GMT
From: E.C.vEersel@KUB.NL (E.C.vEersel)
Subject: Does anyone have some exercises?
Message-Id: <8ib4i8$hka$1@mailnews.kub.nl>
Keywords: perl, exercises
Good day everybody,
A couple of days ago I decided to learn Perl. I bought a book that several
people advised me: Programming Perl, by Wall, Christiansen and Schwartz. The
book is great: clear explanation, funny and clearly arranged. The only
disadvantage is the fact that there aren't any exercises at the end of the
chapter, as in Learning Perl (it is after all more like a reference than it is
a tutorial).
I tried to track down some exercises on the WWW, but no elaborate "exercise
page" was to be found. Can someone help me out here? Does anyone has
some old homework problems around in a dusty drawer? I'd like to test my
knowledge by making some exercises that I don't define myself.
Cordially,
Casper van Eersel
E.C.vEersel@kub.nl
------------------------------
Date: Thu, 15 Jun 2000 15:28:00 GMT
From: Rodney Engdahl <red_orc@my-deja.com>
Subject: Re: evaluating expressions
Message-Id: <8iasl7$v1m$1@nnrp1.deja.com>
In article <slrn8khnl2.62d.tadmc@magna.metronet.com>,
tadmc@metronet.com (Tad McClellan) wrote:
> On Thu, 15 Jun 2000 12:25:25 GMT, Rodney Engdahl <red_orc@my-deja.com>
wrote:
> >In article <slrn8ke0pc.39i.tadmc@magna.metronet.com>,
> > tadmc@metronet.com (Tad McClellan) wrote:
> >
> >
> >> She is not an English PhD.
> >>
> >> Everything you see in the movies is not true, heh heh.
> >>
> >
> >shouldn't that be:
> >
> >Not everything you see in the movies is true.
>
> I think you're right.
>
> My Formal Methods professor's favorite ambiguity is Sear's
> disclaimer:
>
> "Not available in all stores"
>
> Which leaves you wondering where you buy it then :-)
>
> -
While not in the same class, I also like:
"With available anti-lock brakes"
I imagine this is easier than with unavailable anti-lock brakes . . .
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 16:52:55 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: evaluating expressions
Message-Id: <ski2f7hois4161@corp.supernews.com>
Rodney Engdahl (red_orc@my-deja.com) wrote:
: While not in the same class, I also like:
:
: "With available anti-lock brakes"
:
: I imagine this is easier than with unavailable anti-lock brakes . . .
A related one I like -- one company I frequently end up on hold with has a
tape loop which tells you "all operators are busy, and will be with you
shortly." You know, I don't think I need more than one of them...
--
| Craig Berry - http://www.cinenet.net/users/cberry/home.html
--*-- "Beauty and strength, leaping laughter and delicious
| languor, force and fire, are of us." - Liber AL II:20
------------------------------
Date: Thu, 15 Jun 2000 16:39:38 GMT
From: tlars@my-deja.com
Subject: Exporting
Message-Id: <8ib0s7$2fn$1@nnrp1.deja.com>
In Module A I'd like to Export a function that I get when I "use B;".
Therefore,
package B;
@EXPORT qw (
foo
);
-------------------
package A;
use B;
Export qw(foo);
Is this possible?
Thanks,
Tait
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 10:44:56 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Exporting
Message-Id: <Pine.GSO.4.10.10006151044080.5301-100000@user2.teleport.com>
On Thu, 15 Jun 2000 tlars@my-deja.com wrote:
> In Module A I'd like to Export a function that I get when I "use B;".
Sure, that's possible. See the docs for Exporter. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 15 Jun 2000 17:33:34 +0100
From: nobull@mail.com
Subject: Re: Extracting Data From a File with Separate Sections
Message-Id: <u9r99ynbtt.fsf@wcl-l.bham.ac.uk>
jimshepherd@my-deja.com writes:
> <snip code sample>
> > --
But for some inexplicable reason _not_ snip .sig!
> Is it possible in the
> while loop to increment to the next line of the
> file without using the next command, which causes
> a return to the begining of the while loop?
Yes.
while(<FILE>) { BLOCK }
...is magically interpreted as...
while(defined($_ = readline(*FILE))) { BLOCK }
...but that's as far as the magic goes. There is no residual magic
binding the while-loop, $_ and FILE. There is nothing to prevent you
from having statements inside BLOCK that also read from FILE or that
also modify the value of $_.
$_ = <FILE>;
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Thu, 15 Jun 2000 09:46:09 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Extracting Data From a File with Separate Sections
Message-Id: <MPG.13b2a82eefb14c3898ab83@nntp.hpl.hp.com>
In article <8iafpq$60h$1@nnrp2.deja.com>, jimshepherd@my-deja.com
says...
...
+ Thanks for the suggestion. Is it possible in the
+ while loop to increment to the next line of the
+ file without using the next command, which causes
+ a return to the begining of the while loop? In
+ other words, can I put a loop in the while loop
+ that increments the line being read from the
+ file? Code example:
+
+ open(FILE, "< test")
+ or die "Couldn't open file for reading\n";
Include the name of the file and $! in the diagnostic.
+ $type = "section";
+
+ while(<FILE>) {
+ ($first, $second, $third, $fourth, @junk) = split;
+
+ if ($type =~ "section") {
+
+ if ($first =~ "TITL") {
+
+ until ($third =~ "Thickness/diameter"){
+ FILE++; # Attempt to incrment to next line - This doesn't
work!
You bet it doesn't. Just read the next line explicitly.
$_ = <FILE> or die "Read failure. $!\n";
+ ($first, $second,$third, $fourth, @junk) = split;
+ }
+ ($thickness, @junk) = split;
+ }
+ }
+ }
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 15 Jun 2000 15:14:04 GMT
From: Tek <tekahera@my-deja.com>
Subject: Form
Message-Id: <8iarrb$uej$1@nnrp1.deja.com>
Hi,
I'm working on an online form for a friend who has a mediation agency.
I need a script that will do the following: if the user answers to the
questions a certain way (yes, no, whatever to specific questions), the
e-mail will be sent to the agency. If he answers differently, he will
be brought to another page where he will be told that the agency can
not help him and it will provide him with links to other places more
appropriate for his/her case.
Is this easy? complicated? is there a place where I could find such
scripts?
Thank you,
Tekahera
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 15:38:10 GMT
From: Rodney Engdahl <red_orc@my-deja.com>
Subject: Re: Form
Message-Id: <8iat8v$vhs$1@nnrp1.deja.com>
In article <8iarrb$uej$1@nnrp1.deja.com>,
Tek <tekahera@my-deja.com> wrote:
> Hi,
> I need a script that will do the following: if the user answers to the
> questions a certain way (yes, no, whatever to specific questions), the
> e-mail will be sent to the agency. If he answers differently, he will
> be brought to another page where he will be told that the agency can
> not help him and it will provide him with links to other places more
> appropriate for his/her case.
>
> Is this easy? complicated? is there a place where I could find such
> scripts?
>
Should be reasonably easy.
1. at any search engine, search for "perl" and "formmail"
2. modify to match your form.
3. modify to check your conditions for page redirect.
read up on CGI.pm, Net::SMTP, other perl-related issues as necessary
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 15:57:53 GMT
From: andrew_ef@my-deja.com
Subject: help: split pattern
Message-Id: <8iaudm$hc$1@nnrp1.deja.com>
I'm new at regular expressions and pattern matching and
have been having trouble trying to do the following.
I want to split a line of text at each comma, except those commas
that appear between quotes in the string.
For example, the following string:
1234,"hello","this is",56,789,"a, string","10111","and, more!",1314
Should be split into:
1234 "hello" "this is" 56 789 "a, string" "10111" "and, more!" 1314
If anyone can lend a hand I'd appreciate it!
Thx!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 16:10:50 GMT
From: Rodney Engdahl <red_orc@my-deja.com>
Subject: Re: help: split pattern
Message-Id: <8iav5p$1bh$1@nnrp1.deja.com>
In article <8iaudm$hc$1@nnrp1.deja.com>,
andrew_ef@my-deja.com wrote:
> I'm new at regular expressions and pattern matching and
> have been having trouble trying to do the following.
>
> I want to split a line of text at each comma, except those commas
> that appear between quotes in the string.
>
> For example, the following string:
>
> 1234,"hello","this is",56,789,"a, string","10111","and, more!",1314
>
> Should be split into:
>
> 1234 "hello" "this is" 56 789 "a, string" "10111" "and, more!" 1314
>
> If anyone can lend a hand I'd appreciate it!
> Thx!
>
perlfaq4 details how to do this . . .
http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html#How_can_I_split_a_character_de
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 12:18:05 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: help: split pattern
Message-Id: <394901BD.5E49D695@attglobal.net>
andrew_ef@my-deja.com wrote:
>
> I'm new at regular expressions and pattern matching and
> have been having trouble trying to do the following.
Why not read the thread about this exact same topic started
(probably by you) yesterday evening. The subject was (as if
you don't already know):
"split on comma seperated fields, with quoted fields allowed"
Seems you didn't want to read the FAQ?
------------------------------
Date: Thu, 15 Jun 2000 17:30:59 GMT
From: andrew_ef@my-deja.com
Subject: Re: help: split pattern
Message-Id: <8ib3sj$584$1@nnrp1.deja.com>
In article <394901BD.5E49D695@attglobal.net>,
Drew Simonis <care227@attglobal.net> wrote:
> andrew_ef@my-deja.com wrote:
> >
> > I'm new at regular expressions and pattern matching and
> > have been having trouble trying to do the following.
>
> Why not read the thread about this exact same topic started
> (probably by you) yesterday evening. The subject was (as if
> you don't already know):
>
> "split on comma seperated fields, with quoted fields allowed"
>
> Seems you didn't want to read the FAQ?
>
Hmmm, my first time using deja discussion groups. I did not realize
that the subject stays the same and the author changes once someone
replies. I couldn't find the post I made with the author name as my
user account name! I thought the message board deleted my posting, but I
should have looked at the subject lines. In any case I created a new
accout and reposted. The life of a newbie!
Thanks for the smack in the face!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 17:15:55 +0200
From: "Dr. Peter Dintelmann" <Peter.Dintelmann@dresdner-bank.com>
Subject: Re: Hotmail/E-mail/HTML Question
Message-Id: <8iarur$3ss7@intranews.dresdnerbank.de>
Hi
joel_ricker@my-deja.com schrieb in Nachricht
<8iak2o$o7k$1@nnrp1.deja.com>...
>I'm using a perl script to process a list of subscribers and then
>sending out the appropriate page (btw, we're talking subscribed e-mail
>addresses -- not spam). When I tested it, I tried sending it to my own
>e-mail program (Pegasus) and it came up fine and also Hotmail. In
>Hotmail it shows up as a message with an attachment attached -- not the
>way I'm looking for.
>
> A few technical details: I am including a Content-Type: text/html and
>a DOCTYPE. I'm may not be providing enough a header for Hotmail to
>"trust" it as a web page.
>
>I've included my source below (with some personal info removed to
>protect the innocent).
the source looks good from my point of view.
I have done similar things this way.
The display of your message depends on the
capabilities of your recepient's mail software.
So if Hotmail is not capable of displaying html
content directly in a broser window you can't
change that.
Proposal: Convert this into a MIME message of
'Content-type: multipart/alternative' which contains
both a plain text and an html version of your document.
Then every mailer has a good chance to display
your content. (Always have an 'elm' user in mind ;-).
Best regards,
Peter Dintelmann
------------------------------
Date: 15 Jun 2000 17:34:29 +0100
From: nobull@mail.com
Subject: Re: how do I "redirect" a substitution?
Message-Id: <u9pupinbsa.fsf@wcl-l.bham.ac.uk>
webqueen, queen of the web <webqueen@my-deja.com> writes:
> $s2=$s1;
> $s2 =~ s/cat/mouse/;
> Is there a way to do the last 2 lines in one statement?
( $s2=$s1 ) =~ s/cat/mouse/;
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Thu, 15 Jun 2000 16:57:39 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: how do I "redirect" a substitution?
Message-Id: <ski2o3a3is450@corp.supernews.com>
webqueen wrote:
: I don't see this in the docs or camel. Often I want to use a regex to
: extract or modify one string and store that result in another. Usually I
: do something like:
:
: $s1='cat dog';
: $s2=$s1;
: $s2 =~ s/cat/mouse/;
:
: Is there a way to do the last 2 lines in one statement?
($s2 = $s1) =~ s/cat/mouse/;
--
| Craig Berry - http://www.cinenet.net/users/cberry/home.html
--*-- "Beauty and strength, leaping laughter and delicious
| languor, force and fire, are of us." - Liber AL II:20
------------------------------
Date: Thu, 15 Jun 2000 16:23:36 GMT
From: Dominic Prakash <dominic01@hotmail.com>
Subject: Re: how to setuid and setgid
Message-Id: <8iavtj$1s0$1@nnrp1.deja.com>
In article <3948ECEE.EE6A5ED@attglobal.net>,
Drew Simonis <care227@attglobal.net> wrote:
> Dominic Prakash wrote:
> >
> > How do I do that? Presently I am using an external C application
with (-
> > r-sr-sr-x 1 admin) permissions. This C application just uses
setuid
> > and setgid functions. How do I do that in Perl?
> >
>
> Learn thy operating system.
>
> $ man chmod
>
> This has nothing to do with Perl.
Thanks for your informative answer. I dont think you understand the
first part of the problem. Is there any equivalent setuid and setgid
functions in perl like in C.
Thanks
Dominic
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 12:42:58 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: how to setuid and setgid
Message-Id: <39490792.37D22C20@attglobal.net>
Dominic Prakash wrote:
>
>
> Thanks for your informative answer. I dont think you understand the
> first part of the problem. Is there any equivalent setuid and setgid
> functions in perl like in C.
s/man/perldoc -f/
Meaning... use the chmod() Perl function.
------------------------------
Date: 15 Jun 2000 17:15:38 +0200
From: Julien Quint <julien.quint@xrce.xerox.com>
Subject: Re: Infinity ?
Message-Id: <thn1kn2cx1.fsf@mont-chauve.grenoble.xrce.xerox.com>
elephant@squirrelgroup.com (jason) writes:
> it's some IEEE thing .. mentioned in perldata and perlfaq4 .. you can't
> assign it TO a number .. it's not a constant .. it's an overflow thing -
> like the 'E' on a high school calculator when you overflowed the
> positions of the calc
Thanks for the explanation.
> Damian was correct .. taking the compliment of zero and raising it to
> the power of itself will get an overflow every time .. in fact I'd
> hazard a guess that raising 2 to zero's compliment will overflow any
> system .. but better to be safe than sorry
Unfortunately this is not true (on an Alpha/HPUX machine)
> perl -le 'print ((~0)**(~0))'
1.79769313486232e+308
Looks like int's are on 32 bits and floats on 64, so that (2**32-1)**(2**32-1)
still fits and doesn't cause any overflow. On the other it still looks like a
high-enough upper bound for the kind of computation I am interested in.
--
Julien
------------------------------
Date: 15 Jun 2000 15:28:38 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Infinity ?
Message-Id: <8iasn6$5pb$1@charm.magnus.acs.ohio-state.edu>
[A complimentary Cc of this posting was sent to Julien Quint
<julien.quint@xrce.xerox.com>],
who wrote in article <thn1kn2cx1.fsf@mont-chauve.grenoble.xrce.xerox.com>:
> Unfortunately this is not true (on an Alpha/HPUX machine)
>
> > perl -le 'print ((~0)**(~0))'
> 1.79769313486232e+308
>
> Looks like int's are on 32 bits and floats on 64, so that (2**32-1)**(2**32-1)
> still fits and doesn't cause any overflow. On the other it still looks like a
> high-enough upper bound for the kind of computation I am interested in.
Reminds me a story from comp.risk on a statistics class where
calculators were giving answer circa 1000 for 8% of 80 (or some
such). The instructor was worried for some time, but then agreed that
"if the calculator says so, it is so".
Obviously, (2**32-1)**(2**32-1) should look like
1e40000000000
What you see is just the way your FP module reports the overflow.
Most probably you need to set some FP flags to get a more IEEEish
behaviour.
Ilya
------------------------------
Date: 15 Jun 2000 17:56:09 +0200
From: Julien Quint <julien.quint@xrce.xerox.com>
Subject: Re: Infinity ?
Message-Id: <thhfav2b1i.fsf@mont-chauve.grenoble.xrce.xerox.com>
ilya@math.ohio-state.edu (Ilya Zakharevich) writes:
> Obviously, (2**32-1)**(2**32-1) should look like
>
> 1e40000000000
>
> What you see is just the way your FP module reports the overflow.
> Most probably you need to set some FP flags to get a more IEEEish
> behaviour.
You're right! I knew I should have done the math before posting so that I
wouldn't say anything stupid. Anyway, another suggestion that was made to me
was to use the string "inf" in a number context (e.g. 1.0 * "inf" -- thanks,
Guy) unfortunately this doesn't work on HP-UX or "non-IEEEish" systems.
Moreover, there is this annoying little bit:
> perl -wle '$m = 1.0 * "inf"; print $m'
Argument "inf" isn't numeric in multiply at -e line 1.
Infinity
So I guess that for portability reasons, I'll just have to settle with some
"big" number such as ~0, and use the integer pragma.
--
Julien
------------------------------
Date: 15 Jun 2000 17:32:46 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Infinity ?
Message-Id: <961090084.437@itz.pp.sci.fi>
In article <thhfav2b1i.fsf@mont-chauve.grenoble.xrce.xerox.com>, Julien Quint wrote:
>So I guess that for portability reasons, I'll just have to settle with some
>"big" number such as ~0, and use the integer pragma.
Well, you could always use a trick like:
use constant inf => do {my $n = 2; $n *= $n while $n < $n*$n; $n};
(Of course, for all I know someone will now come up with a system
where the above code will not return infinity..)
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: 15 Jun 2000 13:06:37 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: Larry Rosler interview on perl.com!
Message-Id: <slrn8ki4b6.jil.abigail@alexandra.delanet.com>
Bart Lateur (bart.lateur@skynet.be) wrote on MMCDLXXX September MCMXCIII
in <URL:news:3948914e.364866@news.skynet.be>:
:: Abigail wrote:
::
:: >While Microsoft can be blamed for a lot, they cannot be blamed for the
:: >"crippling" of the web. Remember that Bill Gates initialized missed the
:: >Internet bandwagon completely.
::
:: Yes, but they caught up by now. IE is the dominant browser now, and I
:: know of many (low tech) companies, who refuse anything else but a
:: Microsoft server for their company web site; buggy and non-conformant as
:: they are.
And the difference with being only using a buggy and non-conformant
Netscape environment is... ?
Abigail
--
$" = "/"; split // => eval join "+" => 1 .. 7;
*{"@_"} = sub {foreach (sort keys %_) {print "$_ $_{$_} "}};
%_ = (Just => another => Perl => Hacker); &{%_};
------------------------------
Date: 15 Jun 2000 17:14:07 GMT
From: lvirden@cas.org
Subject: Re: Larry Rosler interview on perl.com!
Message-Id: <8ib2sv$1u8$1@srv38.cas.org>
According to Drew Simonis <care227@attglobal.net>:
:lvirden@cas.org wrote:
:>
:> :I was mainly referring to the wobble on undocumented features, and on
:> :those bits that are only partially or not strictly documened.
:> :
:>
:> Then you expect that a standard for perl would document _every_ feature?
:> --
:
:
:Isn't that kinda the point?
That's not the way most standards work - they document a set of features,
and anything else is left undocumented. I shudder to think of the
number of years that would be required to document every feature of
perl - and where someone would find enough people willing to so do so
ignoring the every 6 month to a year release in the interim...
--
<URL: https://secure.paypal.com/refer/pal=lvirden%40yahoo.com>
<URL: mailto:lvirden@cas.org> <URL: http://www.purl.org/NET/lvirden/>
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
------------------------------
Date: 15 Jun 2000 17:17:42 GMT
From: lvirden@cas.org
Subject: Re: Larry Rosler interview on perl.com!
Message-Id: <8ib33m$1u8$2@srv38.cas.org>
According to Drew Simonis <care227@attglobal.net>:
:lvirden@cas.org wrote:
:>
:> There won't be any cruises, or for that matter bug fixes or new versions of
:> perl, if all the people qualified are stuck in comittees trying to construct
:> formal standards language for perl...
:
:I see how standardization has demolished C.
Hmm - where before the ANSI C standard effort began there were dozens of
compilers on the market, now there are very few compilers...
Whether that is due to the standardization process, or a reflection on the
excruciatingly long process, I don't know. However, I would expect that
the effort to standardize perl would be as long, if not longer...
--
<URL: https://secure.paypal.com/refer/pal=lvirden%40yahoo.com>
<URL: mailto:lvirden@cas.org> <URL: http://www.purl.org/NET/lvirden/>
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
------------------------------
Date: Thu, 15 Jun 2000 16:43:09 +0100
From: "Tony Shrimpoton" <ts@relson.net>
Subject: Re: Need perl code to do OS baselining
Message-Id: <8iatie$56f$1@vg170.it.volvo.se>
Steve ,
There are freeware products on the market for unix that do this , i
installed "tripwire" last year on solaris2.7 and aix 4.31, not sure about hp
but you can get the source for it, so you could complie it.
Tony Shrimpton
Steven Sipes wrote in message <39462EE1.5694E84A@nortelnetworks.com>...
>I'll admit upfront that I am not a PERL programmer but I figured that
>somewhere out there, someone has written a utility to do the following:
>
>When you run the perl program in one mode, it will generate a baseline
>of the locally mounted filesystems which shows the
>owner/group/permissions on all files. Then, when run in another mode,
>it will show you the differences.
>
>Does such a beast exist? If not, does someone feel like taking on the
>challenge? I need it to work under HP-UX 10.20, HP-UX 11.00, Solaris
>2.6, Solaris 7, and AIX 4.3.3.
>
>Thanks!
>
>Steven
------------------------------
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 3373
**************************************
