[9096] in Perl-Users-Digest
Perl-Users Digest, Issue: 2714 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 25 11:17:30 1998
Date: Mon, 25 May 98 07:11:30 -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 Mon, 25 May 1998 Volume: 8 Number: 2714
Today's topics:
Re: [Q] MacPerl: droplets and STDIN/@ARGV (Chris Nandor)
Re: An unwelcome and undeserved slap (E. Gkioulekas)
Re: Clearly define "free software" (le Fanttme)
Re: Fastest way to read the last 'n' records in a file <rootbeer@teleport.com>
Re: GNU attacks on the open software community <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Re: GNU attacks on the open software community (Chris Nandor)
Re: GNU attacks on the open software community (Chris Nandor)
Re: GNU attacks on the open software community (Howard Goldstein)
Re: GPL documentation == unspeakable evil (le Fanttme)
Re: GPL documentation == unspeakable evil <schwartz@cs.tu-berlin.de>
Re: GPL documentation == unspeakable evil <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Re: Perl on Amiga <Snowy@studbox.uni-stuttgart.de>
Perl strangeness mjforder@my-dejanews.com
Re: Please Help <dorr@cetrel.lu>
Re: Quiet summary <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Sendmail Errolevel <jens.calisti@eiskonzept.com>
Re: Sendmail Errolevel <rootbeer@teleport.com>
Re: Sendmail Errolevel <zenin@bawdycaste.org>
Shell to perl <fforest@cyberenet.net>
Re: Shell to perl <rootbeer@teleport.com>
Re: Shell to perl <fforest@cyberenet.net>
Re: Suggestion Re: GNU attacks on the open software com <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Re: Tom Christiansen <joswig@lavielle.com>
Re: Who cares! (Ed Blackman)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 25 May 1998 13:02:26 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: [Q] MacPerl: droplets and STDIN/@ARGV
Message-Id: <pudge-2505980856510001@dynamic265.ply.adelphia.net>
In article <356919DE.51E73693@syllogic.com>, marten.trautwein@syllogic.nl wrote:
# Dear All,
#
# I have a simple question as an experienced Unix, but novice MacPerl
# user:
# How can I pass a (list of) files as input arguments
# to a MacPerl script / droplet?
If you drag and drop a group of files on a droplet, it is the same as if
you had typed:
myscript file1 file2 file3 ...
# I have written a simple Perl script that selects lines
# from an input file that conform to a fixed pattern. On Unix
# the script works fine when given an filename as argument on
# the command line. (Code below.) When I create a droplet (or
# system 7 runtime application of the script (MacPerl 4.1.8),
# it does not work. Dropping an input file on the droplet
# starts MacPerl, which then ignores the input file and
# waits for input from the keyboard.
YIKES! MacPerl 4.1.8?? You want MacPerl 5.2.0r4. MacPerl 4.1.8 was
based on perl 4 (4.036, I believe).
That should fix your problem.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 25 May 1998 11:13:51 GMT
From: egkioule@u.washington.edu (E. Gkioulekas)
Subject: Re: An unwelcome and undeserved slap
Message-Id: <6kbjpf$lm6$1@nntp6.u.washington.edu>
Tom Christiansen <tchrist@mox.perl.com> writes:
> [courtesy cc of this posting sent to cited author via email]
>In comp.lang.perl.misc, Stuart Cooper <stuartc@ind.tansu.com.au> writes:
>:But their action in calling for free documentation for Perl is welcome.
>No, it is not. More than merely unwelcome, such a calling is the pinnacle
>of arrogance and folly: arrogance for their myopic misrepresentation of
>our work, folly for aggravating a community whom they should in a just
>world perceive as their allies. And one does not slap one's allies in
>the face.
Please, there are many of us that are not very much in touch with the Perl
world, yet use Perl on many instances. I learned Perl back in 1993.
Then, all the documentation I was told there was was the Camel book.
Saw it mentioned in the man page also. Got it read it. And a good book too.
I learned all the Perl I thought I needn't and then stuck with that and
didn't follow closely the more recent developments.
Now it's 1998 and I didn't know about your documentation until this whole
thing came up on the Net. It is quite possible, when the FSF wrote that
on their task list, that they thought that all the documentation that exists
on Perl is the man pages and the Camel book.
I agree with you that the two communities should think of themselves as
allies. I want to point out to you that in many cases should-be allies
ended up fighting each other over a misunderstanding (Earth-Minbari war).
If it is a misunderstanding, flaming on the Net want do any more good.
Please try sending a polite email to the FSF and ask them to modify that entry
so that it is factually accurate.
You may not be realizing this, but this flaming has the effect of adding
oil to the fire. In the minds of many Perl people who are not as much
in touch with the FSF world, there is painted an image of FSF being
an evil monster of some sort. Of course people can think for themselves
but we are all sensitive to prejudice to some extent. And I believe that
many of us in the FSF world see _that_ as slapping back. Whether or not
it is just, it is hurting both of us on the long run.
>That web page and the subsequent commentary offered by their attendant
>sycophants constitute nothing short of a veiled yet viscious insult
>hurled at those of us who've worked incredibly hard for more a decade
>to produce the free 1,000 page book that *is* the Perl documentation.
>They can play their games of petty sophistry all they like, but the
>bottom line remains that they have callously denigrated the efforts of
>the Perl development community--a community, I shall note, in which
>they have never played any role. It is not ``GNU Perl'', you know.
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
The FSF has never called Perl, the GNU Perl. I think there is some territorial
instict at work here. You think of the FSF as outsiders that want to come
in and meddle the waters. I think that if someone were to take on that task,
they wouldn't be an intruder but a contributor. Territorialism never
made any real sense in international relations, and it makes little
sense here too. We all believe in the same thing. That software is more
useful when it is free, than when it is not free. We may have different
politics and agendas, but we have that thing in common. So we should not
let our differences divide us.
>To date, they have made no move to recant, nor even to offer us a simple
>explanation for this overs(l)ight. Mark my words: the FSF shall never write
>anything on Perl that can even *begin* to compare with the 1,000-page
>free book which they so condescendingly disregard.
If RMS is still in a couch somewhere in New Orleans, then I wouldn't be
surprised :). I noticed that the web page hasn't been updated for some
time so whoever is the webperson seems to be under a high CPU Load.
Personally I prefer it myself if efforts are expanded on
other projects than rewriting documentation for Perl. I myself write
a bit of documentation and it ain't about Perl. There's a lot of stuff yet to
write before starting to rewrite stuff.
At any rate, see the good that came out of this. This exchange lead you
to realize that there may be a problem with your documentation licensing
wrt to code excerpts. I think that under better circumstances, both
communities have something to learn from each other. We should talk more
and flame less.
Elef.
------------------------------
Date: Mon, 25 May 1998 11:59:25 GMT
From: fantome/@/usa/./net (le Fanttme)
Subject: Re: Clearly define "free software"
Message-Id: <FD06C054746BB95B.2503F45BE3ADF9E2.EF66239EADB195FD@library-proxy.airnews.net>
On Mon, 25 May 1998 09:35:17 +0200, Yann Kieffer
<Yann.Kieffer@imag.fr> wrote:
>Leslie Mikesell wrote:
>>
>> In article <3567cffc.0@news.ivm.net>, <Klaus.Schilling@home.ivm.de> wrote:
>
>> >Proprietary software like oracle is immoral.
>>
>> Why do you think that? I can understand the concept that you do
>> not want to pay for software that someone else developed and therefore
>> owns. I don't understand the concept that the existence of
>> this work is immoral. Is someone harmed by the fact that this
>> work, which wouldn't otherwise exist, is available to people willing
>> to help recover the cost of it's development and encourage further
>> such work?
>
>Many people buy win95. Do you thing people buy it to help
>MS recover the cost of its development and encourage further
>such work?
Your point? This does not make proprietary software immoral. People
buy Win95 because it runs the programs that they need in order to get
their jobs done. I've asked before, and I'll ask again -- what's a
small business person like my father to do? Where is the open source
version of WordPerfect? Of Quattro Pro? Of Quicken? Of WinFax? By
golly and by gosh, they don't exist! And the two "best" editors that
the open source community has to offer are both too difficult for the
average person to use, as well as the fact that they don't produce
formatted output without using a non-WYSIWYG presentation. My dad got
over that after we got rid of the Commodore 64.
So where are they?
>People nowadays consider a crashing computer as something
>normal, if not necessary. Doesn't this hurt the whole
>computing community?
This would presume that it were not possible to crash Linux. Having
done it myself a few times (to the point where I can't even switch
"screens" in order to kill the runaway process), I must disagree on
that point. Linux is harder to crash ... but users will figure out a
way to make it do so when it's on their desktops ... if they can even
use Linux because it doesn't have consumer-grade software available.
>I do think so. And if free software helps making things
>right again, it's certainly far from achieved; how
>many decision makers know about free software?
How many decision makers know about open source software and just
don't give a damn because no one in the open source movement to date
has bothered to mess with usability tests ("just learn how to do it;
we don't need to make it easier for you") much less a good WYSIWYG
interface to layout.
>People should really go out and see what's going on outside
>the computer scientists' world. Lots of amazing things
>happening, really...
Yes, you should.
-f
--
austin ziegler * fantome*@*vnet*.*net * http://fantome.vnet.net/
---------------* aziegler*@*vcela*.*com * -------------------------
Remove the stars to email me * Ni bhionn an rath ach
my words my opinions my ideas * mar a mbionn an smacht
-- I Argue Ideas, Not Beliefs: Give Up Your Dogma --
------------------------------
Date: Mon, 25 May 1998 11:27:26 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Phil Taylor <phil@ackltd.demon.co.uk>
Subject: Re: Fastest way to read the last 'n' records in a file
Message-Id: <Pine.GSO.3.96.980525042157.12823I-100000@user2.teleport.com>
On Mon, 25 May 1998, Phil Taylor wrote:
> The ISP in question is Demon, probably the fastest growing ISP around.
> Their policy is actually only to allow PERL programs to be run on the
> server, ie no binaries, hence no databases. I'm still not entirely
> sure why they don't allow binaries, but suspect it's to do with them
> being able to vet what goes up to the server, athough I can't see that
> happening in practice.
That's a reasonable reason to have a policy of no user-generated binaries.
But in that case, they should really install some useful modules
(including databases) shouldn't they? Perhaps if you point out that your
programs take longer to run because you don't have the right tools,
they'll see the light. Obviously they can't be opposed to _all_ binaries,
or you wouldn't even have Perl! :-) Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 25 May 1998 13:11:28 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: GNU attacks on the open software community
Message-Id: <m2btsmhafz.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Olof Oberg <millNO@SPAMludd.luth.se> writes:
> Has anyone asked RMS to make it more obvios what he means with
> 'free' (like a link) on the task list? I doubt he is trying
> to con anyone when he takes every chance he gets to explain
> what 'free software' is.
"Free" means essentially free to redistribute, and free to modify. Of
course, of all forms of freeness, the FSF prefers people applying the
GPL to software. But other forms are ok as well, if they fit their
bill.
The software here is not free to redistribute (no profits allowed, and
that stops about everyone in the redistribution business), and not
free to modify. It may have no immediate associated costs, but that
is irrelevant to the FSF. For them, it is perfectly free software
even if you have to pay $50000 for some piece of software (not
unplausible for some custom-made software), as long as the recipient
gets modification and unlimited redistribution rights.
--
David Kastrup Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany
------------------------------
Date: Mon, 25 May 1998 13:12:58 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: GNU attacks on the open software community
Message-Id: <pudge-2505980907240001@dynamic265.ply.adelphia.net>
In article <6kat3l$3tu$1@mulga.cs.mu.OZ.AU>, fjh@cs.mu.oz.au (Fergus
Henderson) wrote:
# pudge@pobox.com (Chris Nandor) writes:
#
# >fjh@cs.mu.oz.au (Fergus Henderson) wrote:
# >
# ># Why do you think Tom C. would lose?
# >
# >I have posted several times on why. Three main reasons: one, the license
# >allows putting it on a for-profit CD, as long as no profit is received
# >specifically for the perlfaq itself.
#
# But this is a ridiculous position, as shown by John Stanley's
# reductio ad absurdum of austin ziegler's continued defence of
# this position.
#
# The only way that a for-profit CD vendor can prove that no profit
# was received for the perlfaq itself is to sell the whole CD at cost.
You don't have to prove anything at all. The hypothetical plaintiff
does. So if this would go to court, the plaintiff would have to prove
that there was profit to be made from the inclusion of perlfaq, which I
must say would be damned near impossible.
# >Two, Tom loses his rights if he does
# >not protect them, and he has knowingly allowed CDs to distribute
# >for-profit CDs with perlfaq on them, and has done nothing to stop it.
# >Three, Tom has specifically granted permission to put it on for-profit
# >CDs.
#
# OK, these are reasonable points (I don't know about number two, but
# I defer to your no doubt better-informed judgement on that one).
# Nevertheless it would of course be much better for Tom C. to make these
# permissions explicit in his license.
Which is why he is changing it, yep. While I fully believe his license is
sufficient for reasonable persons (not using this to disparage anyone, but
because "resonable person" language is a big point in court cases), it
could be made even better.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Mon, 25 May 1998 13:15:55 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: GNU attacks on the open software community
Message-Id: <pudge-2505980910200001@dynamic265.ply.adelphia.net>
In article <m3k97aiweg.fsf@windlord.Stanford.EDU>, Russ Allbery
<rra@stanford.edu> wrote:
# In comp.lang.perl.misc, Tim Smith <tzs@halcyon.com> writes:
# > Chris Nandor <pudge@pobox.com> wrote:
#
# >> Two, Tom loses his rights if he does not protect them, and he has
# >> knowingly allowed CDs to distribute for-profit CDs with perlfaq on
# >> them, and has done nothing to stop it.
#
# > As far as copyright rights go, I don't believe this is true. "He let
# > them violate his copyright, so he's got to let me do it too" won't get
# > very far in court. Any lawyers lurking who care to comment?
No, I am not. What I did not do is properly tie it in to the legal
principle involved here, which is market effect (well, I did not tie it in
the first time I mentioned this, though I did in later posts).
A. Tom allows distribution on thousands of CD-ROMs
B. A new CD-ROM comes out with perlfaq, Tom tries to stop it
C. Tom has to prove that this new CD impacts the potential market, which I
cannot see how he could do
Tom has allowed this market to change, knowingly. He cannot, therefore,
come back and say that continued infringement affects his market, so the
CD maker claims fair use and that's the end of it.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 25 May 1998 13:35:47 GMT
From: hgoldste@mpcs.com (Howard Goldstein)
Subject: Re: GNU attacks on the open software community
Message-Id: <slrn6mistj.7js.hgoldste@bbs.mpcs.com>
On Mon, 25 May 1998 13:12:56 GMT, Chris Nandor <pudge@pobox.com> wrote:
: In article <6kb4tb$f8j$1@halcyon.com>, tzs@halcyon.com (Tim Smith) wrote:
: # As far as copyright rights go, I don't believe this is true. "He let
: # them violate his copyright, so he's got to let me do it too" won't get
: # very far in court. Any lawyers lurking who care to comment?
:
: Well, the point that brings that together, even if you wouldn't buy that,
: is the principle of fair use and market effect.
:
: A. Tom allows distribution on thousands of CD-ROMs
: B. A new CD-ROM comes out with perlfaq, Tom tries to stop it
: C. Tom has to prove that this new CD impacts market effect, which I cannot
: see how he could do
C doesn't follow. You appear to be relying on a sort of
commutative-laches theory. A cite, please.
--
The ants are my friends, they're blowing in the wind
------------------------------
Date: Mon, 25 May 1998 11:48:29 GMT
From: fantome/@/usa/./net (le Fanttme)
Subject: Re: GPL documentation == unspeakable evil
Message-Id: <088800D56347DD45.ED42B225CCDBC4E2.E13C555CE0742914@library-proxy.airnews.net>
On 25 May 1998 14:30:13 +1000, Stuart Cooper
<stuartc@ind.tansu.com.au> wrote:
>Yes, it's not 'GNU Perl'. Is it "O'Reilly Perl"? Because that's who you need
>to turn to for the definitive, 646 page bible of the language; 'Programming
>Perl'.
Don't be foolish -- you don't *need* to turn to for the definitive
book. I've done perfectly well without it. When I was developing a
rather interesting tool (that I'm trying to get work to let me put it
somewhere useful, like submitting it to the maintainers of
DBD::Oracle), I referred to the Camel book exactly twice. Every other
question I had (and there were several of them) was answered by the
on-line manuals/documentation. In fact, both of the answers I found in
the Camel book were worded *just the same* as in the Camel book.
>In my opinion; there is no single, free Perl manual, 1000 pages or otherwise.
>That's my explanation.
Which would be an opinion based on a false statement.
-f
--
austin ziegler * fantome*@*vnet*.*net * http://fantome.vnet.net/
---------------* aziegler*@*vcela*.*com * -------------------------
Remove the stars to email me * Ni bhionn an rath ach
my words my opinions my ideas * mar a mbionn an smacht
-- I Argue Ideas, Not Beliefs: Give Up Your Dogma --
------------------------------
Date: 25 May 1998 13:24:10 GMT
From: Martin Schwartz <schwartz@cs.tu-berlin.de>
Subject: Re: GPL documentation == unspeakable evil
Message-Id: <6kbrdq$qum$1@news.cs.tu-berlin.de>
In comp.lang.perl.misc Tom Christiansen <tchrist@mox.perl.com> wrote:
> If someone is going to separate them off from the Perl distribution, print
> them, and sell them for profit, then they can bloody well ask my permission.
> Pride of authorship and ownership is a basic human characteristic.
In all this long discussion I understand this to be the crucial point.
I agree with you perfectly, that pride of authorship and ownership is a
very important human quality, after all this makes things like your
documentation going. Also I do despise persons drawing advantage out of
your work, maybe without giving you credits. Anyway I'm unhappy with
this discussion.
In my opinion the destiny of wide spread free software projects is, that
they will be untied from the creators. I even think that for democratic
reasons this has to be the case. And for projects like perl, definitely
needing excellent documentations, I think that documentations cannot and
should not be treated different from the programs themselves. There is
obviously no problem with the way you write and manage the perldocs. But
there obviously is the feeling, that it's no good, if this task is more
or less bound to one person.
Allowing modifications of the perl tutorials makes it easier for intellectual
thiefs, certainly. But I don't see this intellectual theft becoming a big
problem, especially not for you. One will still buy the books with your
authorship, as one relies on this to be best quality.
I dislike very much the idea of perl distributed without GPL license.
Unfortunately this seems to become possible when reading your comments
about "GPV" and so.
I understand your anger in this topic, as you understand it to degrade
your efforts and successes. I hope you understand that this is (like for
me) not the public reception of the case. So please get calm, think of
the respect you earned in public and rely on the public.
Best regards,
Martin
--
// Le degre zero de l'ecriture? Zero probleme!
------------------------------
Date: 25 May 1998 15:57:09 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: GPL documentation == unspeakable evil
Message-Id: <m2k97a8nd6.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Martin Schwartz <schwartz@cs.tu-berlin.de> writes:
> In my opinion the destiny of wide spread free software projects is, that
> they will be untied from the creators. I even think that for democratic
> reasons this has to be the case. And for projects like perl, definitely
> needing excellent documentations, I think that documentations cannot and
> should not be treated different from the programs themselves. There is
> obviously no problem with the way you write and manage the perldocs. But
> there obviously is the feeling, that it's no good, if this task is more
> or less bound to one person.
This is not the problem, many projects remain bound to one person.
What is a problem is when the task is irretrievably bound to one
person. Then things can get ugly and out of hand.
--
David Kastrup Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany
------------------------------
Date: 25 May 98 14:38:29 +0100
From: "Nicholas Stallard" <Snowy@studbox.uni-stuttgart.de>
Subject: Re: Perl on Amiga
Message-Id: <1117.449T1498T8781870@studbox.uni-stuttgart.de>
Andrew Dunbar (andrew@nospam.gpsoft.com.au) had the following to say about "Perl on Amiga"
> Is there anybody here who is rather familiar with using Perl
> on an Amiga? I have finally gotten around to teaching myself
I just started playing with perl on my amiga too :)
> some Perl but I'm having a lot of trouble from square one.
> I have perl5.003 and I'm trying to use the Parse::RecDescent
Get a newer version of Perl ->
[1/0] Harddisk:pub/sys/perl5/bin $ perl --version
This is perl, version 5.004_03
Copyright 1987-1997, Larry Wall
you can find it on your nearest aminet site
perl-5.004-bin.lha dev/gg 3.2M 5+Practical Extraction and Report Language
perl-5.004-src.lha dev/gg 2.7M 5+Practical Extraction and Report Language
> module just released. I'm getting loads of errors trying to
> install this and there is more manual than I can wade through
> right now.
This may have to do with your "old" version of perl
Cya, Nicholas
--
__
__/// Snowy@studbox.uni-stuttgart.de <*> Irc: Yagger (#amigacafe/undernet)
\XX/ http://home.pages.de/~Snowy/ <*> Too Lazy to Fail..
------------------------------
Date: Mon, 25 May 1998 12:24:42 GMT
From: mjforder@my-dejanews.com
Subject: Perl strangeness
Message-Id: <6kbnua$nhp$1@nnrp1.dejanews.com>
Strange things are happening in my perl script!
When I try to run this particular perl script from a Unix cmd-line, I get
this:
$ perl ./notify.pl SEND 0 < ~/isofax.out
Can't locate object method "new" via package "Mail::Send" at ./notify.pl line
70.
However, if I invoke perl with the -d switch, then just do:
DB<1> c
(to continue through the script), the script will excute without problems.
I don't have this problem with any other perl script I've written using the
Mail::Send module, and basically I'm stumped.
If anyone has any suggestions as to why this is happening, or even better, a
solution, please let me know!
Thanks in advance,
Matt ;-)
Matthew J. Forder
Unix SysOp
Seagate Technology Int'l.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 25 May 1998 11:56:40 +0200
From: Denis DORR <dorr@cetrel.lu>
Subject: Re: Please Help
Message-Id: <35694058.6D38B42D@cetrel.lu>
Ann wrote:
...
> #!/usr/bin/suidperl
> $ENV{'PATH'} = '/bin:/home/$user';
> print "Content-type: text/plain", "\n\n";
> $query_string = $ENV{'QUERY_STRING'};
> print "$query_string\n";
> ($var1, $var2) = split(/&/, $query_string);
> print "$var1, $var2\n";
> ($field1, $user) = split(/=/, $var1);
> print "$field1, $user\n";
>
> ($field2, $fw) = split(/=/, $var2);
> print "$field2, $fw\n";
> $fw = "$user:$fw";
> exec "/bin/echo", $fw > "/home/$user/.forward";
$FILE=">/home/$user/.forward";
open FILE or die "Cannot create file : $!\n";
print FILE $fw ;
close FILE;
and, as usual, perldoc perlfaq.
--
HTH.
dorr@cetrel.lu
------------------------------
Date: 25 May 1998 12:59:39 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: Quiet summary
Message-Id: <m2d8d2hazo.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>
pudge@pobox.com (Chris Nandor) writes:
> Yes, they did. The word "free" when applied to software has meant
> "without cost" since long before RMS came around to the picture.
Objection. RMS came around to the picture when the word "free" when
applied to software started meaning "without cost" instead of
"non-disclosed". He stopped working at the MIT exactly because of
that, and started the FSF.
--
David Kastrup Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany
------------------------------
Date: Mon, 25 May 1998 13:35:43 +0200
From: "Jens Calisti" <jens.calisti@eiskonzept.com>
Subject: Sendmail Errolevel
Message-Id: <6kbjr7$p7f$1@news.nacamar.de>
Hi,
i have a problem getting the sendmail errorlevel with a perl script i am
doing the usual
open (MAIL,"| sendmail");
but if i send a mail to my localhost it always crashes with an internal
server error ...:-(
sendmail always posts its error-messages to STDOUT a select(...) do not work
and $? do not return any numeric-value ???
any suggestions ?
bye,
jens calisti
jens.calisti@eiskonzept.com
------------------------------
Date: Mon, 25 May 1998 11:39:10 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Jens Calisti <jens.calisti@eiskonzept.com>
Subject: Re: Sendmail Errolevel
Message-Id: <Pine.GSO.3.96.980525043641.12823J-100000@user2.teleport.com>
On Mon, 25 May 1998, Jens Calisti wrote:
> i have a problem getting the sendmail errorlevel with a perl script i am
> doing the usual
> open (MAIL,"| sendmail");
> but if i send a mail to my localhost it always crashes with an internal
> server error ...:-(
Well, if it's a server error, that's not a Perl error! :-)
> sendmail always posts its error-messages to STDOUT a select(...) do not
> work
In what way does select not work?
> and $? do not return any numeric-value ???
$? is set to the process's return status when you close the filehandle. It
will always be a numeric value.
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 25 May 1998 12:32:09 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Sendmail Errolevel
Message-Id: <896099971.16222@thrush.omix.com>
[posted & mailed]
Jens Calisti <jens.calisti@eiskonzept.com> wrote:
: i have a problem getting the sendmail errorlevel with a perl script i am
: doing the usual
: open (MAIL,"| sendmail");
: but if i send a mail to my localhost it always crashes with an internal
: server error ...:-(
: sendmail always posts its error-messages to STDOUT a select(...) do not work
: and $? do not return any numeric-value ???
: any suggestions ?
You probably should check out my Mail::Sendmail module. It's alpha
stage (only because I haven't finallized the interface yet), but
the code is rugged and pretty well tested (I have a large number of
sites that use it already in CGI environments without a problem).
It's main feature is the use of open3 to catch and report any and
all of sendmail's funky errors in a usable mannor.
It's available at:
ftp://thrush.omix.com/pub/perl/modules/Mail-Sendmail-1.10.tar.gz
If you only need a code sample to handle sendmail cleanly, check out
it's Send() method. It's got all the open3() code you'll need to
handle sendmail. -And you may want to check out the command line
options used as well.
Hope this helps!
--
-Zenin
zenin@archive.rhps.org
------------------------------
Date: Mon, 25 May 1998 19:11:05 -0500
From: "Fred Forester" <fforest@cyberenet.net>
Subject: Shell to perl
Message-Id: <35695112.0@news.cyberenet.net>
Hi,
I have what I think to be a shell script is it possible to convert this to
perl
#! /bin/sh
clear
echo "CyberENET Web Stats Generator"
echo "all stats will be mailed out to $USER@cyberenet.net"
echo "----------------------------------------------------------"
echo " "
echo -n "Username or Domain Name (eg. yourname or www.yourdomain.com : ";
read victim
echo -n "Enter year/month (formatted 199706 for June 1997) : "; read datey
echo -n "Enter day (formatted 05 or 29): "; read dated
echo "------processing..."
echo "web stats output file for: $victim" >> /tmp/.$USER.webstat
echo "total hits for sepcified month: " >> /tmp/.$USER.webstat
cat /home/webmast/logs/digest/$datey.* | grep $victim | awk '{print $1}'>>
/tmp/.$USER.webstat
echo "---------detailed-site-info----------------" >> /tmp/.$USER.webstat
gzcat /home/webmast/logs/$datey/$dated/* | grep $victim >>
/tmp/.$USER.webstat
echo -n "------done"
cat /tmp/.$USER.webstat | sendmail $USER
rm /tmp/.$USER.webstat
Thanx
------------------------------
Date: Mon, 25 May 1998 11:49:50 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Fred Forester <fforest@cyberenet.net>
Subject: Re: Shell to perl
Message-Id: <Pine.GSO.3.96.980525044907.12823K-100000@user2.teleport.com>
On Mon, 25 May 1998, Fred Forester wrote:
> I have what I think to be a shell script is it possible to convert this
> to perl
Yep, it's possible. See the FAQ for more information. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 25 May 1998 21:53:55 -0500
From: "Fred Forester" <fforest@cyberenet.net>
Subject: Re: Shell to perl
Message-Id: <3569773a.0@news.cyberenet.net>
Sorry, which FAQ?
I did look at some FAQ's but could find how to convert
gzcat to perl.
Tom Phoenix wrote in message ...
>On Mon, 25 May 1998, Fred Forester wrote:
>
>> I have what I think to be a shell script is it possible to convert this
>> to perl
>
>Yep, it's possible. See the FAQ for more information. Hope this helps!
>
>--
>Tom Phoenix Perl Training and Hacking Esperanto
>Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
>
------------------------------
Date: 25 May 1998 13:22:24 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: Suggestion Re: GNU attacks on the open software community
Message-Id: <m2af86h9xr.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>
tb@mit.edu (Thomas Bushnell, n/BSG) writes:
> tzs@halcyon.com (Tim Smith) writes:
>
> > The courtesy copies he sends have the same notice on them, so that's not
> > really a problem.
>
> Being an out gay Christian on Usenet exposes one to a fair amount of
> hate mail, so I was well prepared for Tom's email. It's a shame he's
> do fond of the tactics of Jesse Helms and his ilk.
Please don't use your presumed attacked-minority status for explaining
any dissension or aggressiveness towards you. That is cheap. Tom is
perfectly able to be rude on his own without needing a presumed victim
with special status. In fact, I'm pretty sure he would have not
noticed (and probably still hasn't) without you bringing up that cheap
pseudo-defense.
--
David Kastrup Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany
------------------------------
Date: 25 May 1998 21:03:41 +0200
From: Rainer Joswig <joswig@lavielle.com>
Subject: Re: Tom Christiansen
Message-Id: <3edyuq9e.fsf@lise.lavielle.com>
tina@scandinaviaonline.se (Tina Marie Holmboe) writes:
> In article <u1hwwbexpna.fsf@ten-thousand-dollar-bill.mit.edu>,
> tb@mit.edu (Thomas Bushnell, n/BSG) writes:
>
> > He's losing touch, and for his own mental health, we should let him go
> > back to writing documentation and teaching classes, which he does
> > well.
>
> That was *horrid*. How on *Earth* can you manage to squeeze out something
> like that ?
>
> It is times like these that I wonder what ... what sort of people we
> are. Arrogance and a total lack of ability to understand that there are
> actually *emotions* around as well.
>
> Its... pointless. Its disgusting.
>
>
> To Tom: I *intensly* dislike your style of conversation, but *THAT*
> wasn't something you deserved.
Agreed.
------------------------------
Date: Mon, 25 May 1998 03:08:16 -0400
From: edgewood@pobox.com (Ed Blackman)
Subject: Re: Who cares!
Message-Id: <gjRa1U75iJNR092yn@pobox.com>
charlie@antipope.org (Charlie Stross) wrote:
>On 22 May 1998 12:43:19 GMT, Tom Christiansen
><tchrist@mox.perl.com> wrote:
>>
>>It was amazing. 90 vs 12 "real perl" from my machine this morning.
>
>That's because you've accidentally invented the first wholly new type
>of religious war to arise on usenet since about 1994. I expect this
>one will run and run, much like vi/emacs, windows/linux/macos/any_os,
>and tcl/perl/python: namely, GPL/other free software licenses.
Not true, actually. The Linux and BSD newsgroups are periodically plagued
with GPL/BSD license flamewars.
Like most flamewars, this whole thing could have been avoided if people
weren't so quick to assume that any criticism of their work is a
personal attack on them, and to immediately react in a public and emotional
manner, using loaded words like "evil" and "liar".
Ed
------------------------------
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 2714
**************************************
