[9072] in Perl-Users-Digest
Perl-Users Digest, Issue: 2690 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 22 13:07:40 1998
Date: Fri, 22 May 98 10:00:51 -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 Fri, 22 May 1998 Volume: 8 Number: 2690
Today's topics:
Re: Camel p. 541: "Prefer join()" (Jason Gloudon)
Re: Camel p. 541: "Prefer join()" (Jason Gloudon)
fielded text removal blap@my-dejanews.com
Re: Getting hex codes from string <lr@hpl.hp.com>
Re: GNU attacks on the open software community (Chris Adams)
Re: GNU attacks on the open software community (Leslie Mikesell)
Re: GNU attacks on the open software community (Dave Terrell)
Re: GNU attacks on the open software community (Georg Bauer)
Re: GNU attacks on the open software community <hp@pobox.com>
Re: GNU attacks on the open software community (Clint Harris)
Re: GNU attacks on the open software community <hp@pobox.com>
Re: Help needed with reg. expr. (newbie) <rootbeer@teleport.com>
Re: Help needed with reg. expr. (newbie) <cwernli@dwc.ch>
Re: Help needed with reg. expr. (newbie) <danboo@negia.net>
Help with Perl for DOS and STDOUT <paladin@uvic.ca>
http authentication <choirboy@rocketmail.com>
Re: liberame <millNO@SPAMludd.luth.se>
Re: More double standards out of the FSF (Thomas Bushnell, n/BSG)
Re: More double standards out of the FSF <hp@pobox.com>
Re: More double standards out of the FSF (Abigail)
Re: More double standards out of the FSF (Abigail)
Re: news/mail posting (John Moreno)
Parsing Problem with MAC's <sales@mmcc.net>
Re: Quiet summary <hp@pobox.com>
Re: Re-direct question <rootbeer@teleport.com>
Re: Re-direct question <lr@hpl.hp.com>
Re: Re-direct question <cwernli@dwc.ch>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 22 May 1998 16:11:04 GMT
From: jgloudon@hyssop.bbn.com.bbn.com (Jason Gloudon)
Subject: Re: Camel p. 541: "Prefer join()"
Message-Id: <ssh91.130$152.1271372@cam-news-reader1.bbnplanet.com>
jari.aalto@poboxes.com <jari.aalto@poboxes.com> wrote:
.
.
>I was purposively provocative :-) I wanted to see comments from
>others to show me if I had understood the benchmarking all wrong.
>
>While the FOR loops were superfluous, they only were constans.
>I learnt that it would be better to benchmark functions and
>supply 'control' as in John'n responses.
>
>The Benchmark pod page does not highlight these issues, so could I ask
>someone to update and write "rules of thumb" to the pod page, plus an
>simple example (demonstration of proper benchmarking) that would
>benchmark some relatively differences between couple of perl
>statements; which is the fastest.
Benckmarks, Damned lies and statistics....
Rule 1:
Don't try to compare benchmarks that make I/O system calls and believe the
results unless you know how your operating system caches.
--
Jason
------------------------------
Date: Fri, 22 May 1998 16:17:37 GMT
From: jgloudon@hyssop.bbn.com.bbn.com (Jason Gloudon)
Subject: Re: Camel p. 541: "Prefer join()"
Message-Id: <Byh91.132$152.1271372@cam-news-reader1.bbnplanet.com>
jari.aalto@poboxes.com <jari.aalto@poboxes.com> wrote:
[ Clutter removed ]
I believe the advantage to join over concatenation comes when you
repeatedly append to a string using . or .= as in :
while(something){
$long_string .= $more_data;
}
as long_string may have to be copied several times into a larger block
of memory as it grows in length.
--
Jason
------------------------------
Date: Fri, 22 May 1998 16:16:19 GMT
From: blap@my-dejanews.com
Subject: fielded text removal
Message-Id: <6k48cj$rkf$1@nnrp1.dejanews.com>
How do I remove one entire field of info. (AB:)
With fielded info that looks like this:
attempt attached
AN: 09279731|
AN: <NLM> 97438432|
TI: Effect of a Rosmarinus officinalis leave extract on plasma glucose
AU: Erenmemisoglu A; Saraymen R; Ustun S|
CS: Department of Pharmacology, Faculty of Medicine, Erciyes University,
Kayseri, Turkey.|
JN: Pharmazie; 52 (8) p645:6|SF: INDEX MEDICUS|
AB: Purple:coloured dandelion (Taraxacum officinale) callus cultures
producing anthocyanin pigments were established on a cytokinin.
GS: Support, Non:U.S. Gov't|
ATTEMPT
#!/usr/local/bin/perl -w
# Usage:
# Usage:
# clean_rec.pl input_text_file output_text_file
$found_field = 0;
open (IN, "$ARGV[0]") ||
die "Cannot open $ARGV[0] to read";
open (OUT, ">$ARGV[1]") ||
die "Cannot open $ARGV[1] to write";
while ($input_line = <IN>)
{
if ($input_line =~ /^AB: /) # Now select just these fields
{
$found_field = 0;
}
elsif ($input_line =~ /^\s*$/) # blank line indicates end of record
{
$found_field = 0;
}
else
{$found_field = 1}
if ($found_field == 1){
print OUT $input_line;
}
}
close IN;
close OUT;
exit 0;
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Fri, 22 May 1998 09:37:45 -0700
From: "Larry Rosler" <lr@hpl.hp.com>
Subject: Re: Getting hex codes from string
Message-Id: <6k49kq$8o2@hplntx.hpl.hp.com>
[posted and emailed in one command using Outlook Express *sigh*]
Simon Fairey wrote in message
<895845873.27136.0.nnrp-11.c246a788@news.demon.co.uk>...
>Hi,
>
>( sorry Outlook Express doesn't seem to like reply to newsgroup and
author
>*sigh* just one or the other!)
...
The command is "Reply to All" from a Toolbar button, or "Compose:Reply
to Newsgroup and Author" from a pull-down menu. *sigh*
--
Larry Rosler
Hewlett-Packard Laboratories
lr@hpl.hp.com
------------------------------
Date: 22 May 1998 15:59:14 GMT
From: cadams@ro.com (Chris Adams)
Subject: Re: GNU attacks on the open software community
Message-Id: <6k47ci$2rl$1@news.ro.com>
According to Leandro Guimaraens Faria Corcete Dutra <leandro@lge.com.br>:
> Remember, Linux is the kernel. The OS is, perhaps, 40% the kernel and
>60% tools -- GNU tools. If you add the compilers, things get still
>clearer. Compilers and the libc are arguably more important than the
>kernel itself, since they provide the environment thru which C userland
>programs communicate with the kernel.
Again, a good chunk of the base is NOT GNU!!! Maybe 90% of the
available GNU tools are included in Linux, but of the tools included
with Linux, GNU tools do not make up 90%. For example, out of the base
package list of Red Hat 5.0, only about 25% of the packages are from the
GNU project.
I'm not saying that GNU software is not an essential part of Linux,
because it is definately an essential part. However, it is not THE
essential part! Many parts make up the whole from many different
sources, including the GNU project and the *BSD project(s). Some parts
are strictly Linux based, some are primarily developed on Linux, and
some are ported from other platforms.
If you want to start renaming the OS for each of the parts, you will
never finish. This is political correctness taken to a new extreme. To
say that GNU software is more important than any other software to the
Linux OS is not true. If you put Dunlop tires on your Ford, do you call
it a Dunlop/Ford? The tires are an integral part - you can't do without
them. They can be replaced, but so can GNU software, if someone really
wanted to. When this came up once before, a group of people started
trying to use a different C compiler to compile the kernel, so that the
insistance that GNU was important enough to be part of the name of the
OS would be a little less true. That is just wasted effort, dividing
the free software community. That is also what writing a completely new
set of documentation for Perl would be: wasted effort that divides the
community.
--
Chris Adams - cadams@ro.com
System Administrator - Renaissance Internet Services
I don't speak for anybody but myself - that's enough trouble.
------------------------------
Date: 22 May 1998 10:57:39 -0500
From: les@MCS.COM (Leslie Mikesell)
Subject: Re: GNU attacks on the open software community
Message-Id: <6k479j$kt5$1@Mars.mcs.net>
In article <6k3r21$i6n$1@hydra.cs.mu.oz.au>,
Tyson Richard DOWD <trd@hydra.cs.mu.oz.au> wrote:
>les@MCS.COM (Leslie Mikesell) writes:
>
>>In article <yc74sykdoyu.fsf@shell1.tiac.net>,
>>Zach Kessin <zkessin@shell1.tiac.net> wrote:
>
>>>The FSF in general and RMS in particular seem to be rather steemed now
>>>that the Free/Open software movement has started to ignore them. Linux
>>>exists because of Linus and company and Perl because of Larry Wall and
>>>Randal and Tom (and others of course). I think RMS is annoyed because
>>>free software is finaly being taken seriously, and its Linux, Apache
>>>and perl that people are looking at.
>
>>And for obvious reasons. These do not have restrictions that prevent
>>commercial use or linking with code under different copyrights. People
>>can actually use them for something of value.
>
>Oh, right, unlike gcc which is only used for compiling incredible
>amounts of software, which isn't valuable at all.
But only a few businesses depend on *distributing* gcc itself or
making it interoperate with other people's stuff. In fact most
places that modify gcc for their specific needs probably don't
mind the redistribution restrictions at all since they don't want
to distribute the changes in the first place. However things like
perl and apache would be severely limited by a restriction against
dlopen()ing someone else's libraries or linking them statically
for things like encryption, database access and authentication
modules. Under the GPL, every such use would have to be custom
programmed since the modifications could not be shared, and without
the open source base, interoperability would be a problem.
Les Mikesell
les@mcs.com
------------------------------
Date: Fri, 22 May 1998 16:01:22 GMT
From: dterrell@obscurity.net (Dave Terrell)
Subject: Re: GNU attacks on the open software community
Message-Id: <slrn6mb8dp.onk.dterrell@cthulhu.obscurity.net>
Fergus Henderson <fjh@cs.mu.oz.au> says:
>Tom Christiansen <tchrist@mox.perl.com> writes:
>
>>Now, as to modification, why would screw with something counter to its
>>author's intentions and wishes? That's evil.
>
>So, does that mean that you think that Xemacs and egcs are evil?
>
>I think it is much better to let the *public* decide on
>the merits of the modifications.
Releasing Lucid/XEmacs and calling it Emacs, or releasing egcs and calling
it gcc would be extremely counterproductive.
Rewrite perl, call it ierl (impractical....), and release it to the public.
Do you think anybody will havea problem with that?
--
Dave Terrell
dterrell@obscurity.net
finger dterrell@uiuc.edu for pgp key
------------------------------
Date: Fri, 22 May 1998 12:00:55 GMT
From: gb@hugo.westfalen.de (Georg Bauer)
Subject: Re: GNU attacks on the open software community
Message-Id: <gb-2205981400560001@hugo.westfalen.de>
In article <m390nvryg4.fsf@windlord.Stanford.EDU>, Russ Allbery
<rra@stanford.edu> wrote:
>Is this an ivory tower I see before me?
If it is, it has no windows.
bye, Georg
--
#!/usr/bin/perl -0777pi
s/TS:.*?\0/$_=$&;y,a-z, ,;s, $,true,gm;s, 512,2048,;$_/es
------------------------------
Date: Fri, 22 May 1998 16:11:18 GMT
From: robert havoc pennington <hp@pobox.com>
Subject: Re: GNU attacks on the open software community
Message-Id: <wsnogwq1e1l.fsf@harper.uchicago.edu>
cmcurtin <cmcurtin@interhack.net> writes:
>
> And how would RMS, et al, react to find one of the "GNU Free Books"
> gutted, authorship removed, examples changed to things that don't
> work, and then sold in bookstores everywhere because the publisher is
> one with good distribution channels?
>
> This is *precisely* what has happened time and again by morons who
> pretend to be Perl experts. They steal Larry's work. They steal
> Tom's work. They steal Randal's work. They steal from us all.
>
You're way off base. This isn't the issue.
FSF has a project to write *their own* documentation on their task
list. They are not going to use any of Tom's work.
> What bothers me about the GNU community is that there is a level of
> arrogance in assuming that the One True Way(tm) of software
> development (and apparently documentation, as well!) is based on what
> Eric Raymond calls the Bazaar model. Making such an assertion is
> absolutely stupid. Projects that operate in what Eric calls the
> "Benevolent Dictatorship" mode have produced significant pieces of
> work. The *BSD operating systems. XEmacs. Apache. Perl.
>
Again, you are confused. The FSF is supposed to be the Cathedral
model. Their projects are very closed and few people participate. The
Bazaar describes mostly non-FSF projects, such as Linux.
>
> The FSF did not create Perl. The FSF has no business telling the Perl
> community how to do its work.
They aren't. They are writing *their own* manual. Or rather, they have
it on the task list, I doubt it will happen soon.
>
> This is a shame, no matter how you look at it. And it would be
> terrible to allow this to create a rift between the two communities.
> The rift is being created by the FSF, who refuses to recognize the
> Perl Community's right to do as it pleases. If this trend should not
> reverse, if the rift becomes Yet Another Irreconcilable Difference
> between the FSF and some other entity of the free software community,
> I know which side I'll be on, and it won't be with The Free Software
> Foundation or the GNU Project.
>
There is no irreconcilable difference, because they aren't asking you
to do anything, they are just doing something themselves. Perhaps it's
duplication of effort, but it's not a rift unless you demand that
*they* not write docs because it's "your" right to do so. Or burst
onto Usenet with lengthy flames over very minor issues.
Havoc Pennington ==== http://pobox.com/~hp
------------------------------
Date: 22 May 1998 16:20:45 GMT
From: clint.harris@software.com (Clint Harris)
Subject: Re: GNU attacks on the open software community
Message-Id: <6k48kt$c97$1@gte2.gte.net>
In <u1hk97ftqdx.fsf@mary-kay-commandos.MIT.EDU> Thomas Bushnell, n/BSG wrote:
> Tom Christiansen <tchrist@mox.perl.com> writes:
>
> > This is the funniest thing I've heard in a long time. No one knows about
> > guile. No one cares. It will never, ever, ever replace Perl. Mark my
> > words.
>
> Why do you care so much? Why is so much of your ego bound up with the
> success or failure of a stupid software project?
>
> You couldn't handle a simple discussion once of features that emacs
> handled and vi didn't; you got visibly upset and could barely manage
> to keep your temper under control. And now you're so threatened by a
> different scripting language that you feel the need to toss off
> pointless things like this.
>
> Get a hold of yourself, Tom. It's only a software project. It's not
> Life.
>
I don't want to incur anyone's wrath here but instead of attacking each other
maybe we should remember that we are a community. I've watched this thread go
for a couple of days now and couldn't help posting out of frustration. We
should be thanking people like Tom, Richard, Randal, & Larry (and countless
others) for contributing to our community regardless of what licence they
choose to release under, not making them defend thier actions. This thread
has become a waste of Tom's time (if I may be so bold), He's having to say
the same thing again and again. He obviously wants his contribution to be
free. These guys are studs, love thier work or build us something better.
Just my opinion.
-Clint
--
+----------------------------------------------------------------+
| Clint Harris Software.com, Inc. |
| clint.harris@software.com |
| Phone: 805-957-1790 Santa Barbara, CA 93101 |
| Fax: 805-957-1544 http://www.software.com |
+----------------------------------------------------------------+
| Software.com, Inc. - The Internet Infrastructure Company (tm) |
+----------------------------------------------------------------+
------------------------------
Date: Fri, 22 May 1998 16:20:14 GMT
From: robert havoc pennington <hp@pobox.com>
Subject: Re: GNU attacks on the open software community
Message-Id: <wsnn2ca1dmp.fsf@harper.uchicago.edu>
les@MCS.COM (Leslie Mikesell) writes:
>
> There are programs that by nature don't have any reason to be
> linked with other people's extensions so the GPL doesn't cause
> major harm. In an age of reusable objects where everything
> knows how to dynamically load and use arbitrary extensions those
> programs are becomming pretty rare and copyrights that require
> prior knowledge of the separate encumberances of each library
> are going to be a serious problem.
>
Thus the LGPL, used on most libraries.
> >There is no demonstrable correlation between license and free software
> >success that I can see. All the major licenses have both failures and
> >success stories - that's why they're major licenses.
>
> Perhaps you just don't believe in cause and effect relationships.
>
Many GPL programs have been very successful in production commercial
environments, and so have many non-GPL programs. So there is no clear
effect ("software does not succeed") with GPL as cause.
The question as always is whether you want proprietary software which
uses the code. Some people say yes, some don't. Use the license you
like.
Havoc Pennington ==== http://pobox.com/~hp
------------------------------
Date: Fri, 22 May 1998 15:59:02 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: rgold@sctcorp.com
Subject: Re: Help needed with reg. expr. (newbie)
Message-Id: <Pine.GSO.3.96.980522085732.29577Z-100000@user2.teleport.com>
On Fri, 22 May 1998 rgold@sctcorp.com wrote:
> if (@_ =~ /(\d+)/) {
In a scalar context, the "name" of an array returns the number of elements
in the array. I think you meant to use $_[0] or "@_" or something similar.
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 22 May 1998 18:09:06 +0200
From: Christoph Wernli <cwernli@dwc.ch>
To: rgold@sctcorp.com
Subject: Re: Help needed with reg. expr. (newbie)
Message-Id: <3565A322.E9B24BA1@dwc.ch>
rgold@sctcorp.com wrote:
>
> I am writing a test perl script to help distinguish PVCS base version numbers
> (such as 1.12) from branches (such as 2.1.3.0). In the process, I have found
> that my understanding of regular expression parsing does not seem to work very
> well in perl.
>
> Here is a sample:
>
> --------- begin ---------
> is_nonbranch( "21" );
> is_nonbranch( "ab" );
> is_nonbranch( "12.3" );
> is_nonbranch( "32.3.1.0" );
>
> sub is_nonbranch {
> if (@_ =~ /(\d+)/) {
> print @_, " matches at ", $1, "\n";
> } else {
> print @_, " doesn't match\n";
> }
> }
> ---------- end ----------
>
> I intended the output to be:
>
> 21 matches at 21
> ab doesn't match
> 12.3 matches at 12
> 32.3.1.0 matches at 32
>
> but I get:
>
> 21 matches at 1
> ab matches at 1
> 12.3 matches at 1
> 32.3.1.0 matches at 1
>
> what am I doing wrong? And is there a better way to do this?
You should probably use a scalar, not an array (you're passing a scalar
to is_branch, right ?), i.e:
sub is_nonbranch {
my $number = shift;
if ($number =~ /(\d+)/) {
print $number, " matches at ", $1, "\n";
} else {
print #number, " doesn't match\n";
}
}
Cheers, -werns
------------------------------
Date: Fri, 22 May 1998 12:26:47 -0400
From: Dan Boorstein <danboo@negia.net>
Subject: Re: Help needed with reg. expr. (newbie)
Message-Id: <3565A747.59D048B7@negia.net>
rgold@sctcorp.com wrote:
>
> I am writing a test perl script to help distinguish PVCS base version numbers
> (such as 1.12) from branches (such as 2.1.3.0). In the process, I have found
> that my understanding of regular expression parsing does not seem to work very
> well in perl.
>
[SNIP]
> sub is_nonbranch {
> if (@_ =~ /(\d+)/) {
^^
scalar
[SNIP]
as a suggestion, run your scripts with warnings _on_. if you had
you would have seen a message like "Applying pattern match to @array
will act on scalar(@array) at...". the hint here is that pattern
matching is done on scalars. so you need to isolate the first
argument to your sub and then use it on the left hand side of your
binding operator.
if ($_[0] =~ /(\d+)/) {
or
if (shift =~ /(\d+)/) {
or
$_ = shift;
if (/(\d+)/) {
i would also suggest the same treatment for @_ in your print
statements, simply because you are only acting on single elements
it seems confusing to print any extraneous elements that might
get passed in. and if you use shift, you're going to lose the
elements anyway.
cheers,
--
Dan Boorstein home: danboo@negia.net work: danboo@y-dna.com
"THERE IS AS YET INSUFFICIENT DATA FOR A MEANINGFUL ANSWER."
- Cosmic AC
------------------------------
Date: Fri, 22 May 1998 09:07:40 -0700
From: Draco Paladin <paladin@uvic.ca>
Subject: Help with Perl for DOS and STDOUT
Message-Id: <Pine.A41.3.96.980522090328.60536A-100000@unix3.UVic.CA>
Hi,
This is my first post to comp.lang.perl.misc. I have just recentally got
into perl programming and have been playing around with it on my MSDOS box
and am having trouble with opening STDOUT. The code fragment that is
giving the error is as follows:
close(STDOUT);
system("copy $f1 $f2");
open(STDOUT, ">-");
It is the last line that is giving me an error message. So my question is
how do I re-open STDOUT on a DOS machine?
Thanks in advance.
---------------------------------------------
Mother is the name for GOD on the lips and
hearts of all children. - Eric Draven
------------------------------
Date: Fri, 22 May 1998 11:21:56 -0500
From: "Bryan Davis" <choirboy@rocketmail.com>
Subject: http authentication
Message-Id: <6k48m8$ms1$1@client3.news.psi.net>
I am running IIS 4 on my NT server. Is there a way through perl (by sending
some http header or something) to authenticate a user on the web server?
------------------------------
Date: Fri, 22 May 1998 18:23:36 +0200
From: Olof Oberg <millNO@SPAMludd.luth.se>
Subject: Re: liberame
Message-Id: <3565A688.F9F2178@SPAMludd.luth.se>
Tom Christiansen wrote:
[snip]
> Hm... is the freeware that the public talks about not free software?
IMO no. Or not necessarily is more correct. IMO "freeware" is
a matter of price whereas "free software" isnt. I cant remember
I have seen the distinction defined though (I havent bothered
to look).
In Swedish we have gratis and fri. Only phrase I can come up
with that may connect fri (free) with something monetary is
"fri entre" which would be "free entrance" (or something like
that).
Btw, couldnt Larry Wall give us an linguists view on the use of
'free' vs. 'gratis'? IMO 'gratis' defines clearly what it means
while 'free' is ambiguous with most people seeing it as 'gratis'
when talking about "free software", but with the definition
(in dictionaries) talking mostly about libre.
/mill
--
#############################################################
# millNO@SPAMludd.luth.se # http://pedgr571.sn.umu.se/~mill #
#############################################################
------------------------------
Date: 22 May 1998 11:52:25 -0400
From: tb@mit.edu (Thomas Bushnell, n/BSG)
Subject: Re: More double standards out of the FSF
Message-Id: <u1hyavuxpza.fsf@ten-thousand-dollar-bill.MIT.EDU>
Tom Christiansen <tchrist@mox.perl.com> writes:
> You cannot "modify" Perl in some way to make it not work like the standard
> release and still call it by that name.
Which is fine, and not the point.
Suppose I modify Perl significantly, by removing many features and
adding other ones, and embed it in a specialized program where this
modification was esssential to meet some speed or size constraints.
I'll happily change the name, and I'll be very very careful to give
credit to everyone who contributed to Perl.
Now, in documenting my new application, I need to document Perl, and
for that I want to use large portions of the perlfaq text. Now, I
certainly want to acknowledge the authorship of the text, and I'll be
happy to give people a copy of the unmodified text too.
But the copyright on perlfaq prohibits me from distributing the
modified perlfaq. It forces me to write an appendix, which is
unworkable if the changes to the perl code are extensive and
pervasive.
Thomas
------------------------------
Date: Fri, 22 May 1998 15:54:10 GMT
From: robert havoc pennington <hp@pobox.com>
Subject: Re: More double standards out of the FSF
Message-Id: <wsnra1m1eu5.fsf@harper.uchicago.edu>
barr@cis.ohio-state.edu (Dave Barr) writes:
>
> In article <wsnzpga7qsq.fsf@harper.uchicago.edu>,
> robert havoc pennington <hp@pobox.com> wrote:
> >I am not sure what else one expects RMS[1] to do. He has his values
> >and goals; he puts on his task list what he thinks needs to be done in
> >order to achieve them. It's not like he mentioned Tom personally, he
> >just said "we need some free[2] Perl docs." Just like he says "we need
> >a free version of Motif," or "we need a free Qt,"
>
> Which is precisely why Tom is so mad. To mention "we need some free
> Perl docs" in the same manner as you would say "we need a free Motif"
> is insulting, because the license for Motif says you must pay royalties,
> and thus charge money, while Perl docs are without charge.
>
But RMS doesn't give a damn whether money is charged, except that
requirements to pay are just another license restriction. That isn't
why Motif and Qt are on the list, and it isn't why Tom's perl docs are
on the list. They're all on the list for the same reason, that they
can't be modified, redistributed, and/or used without restriction.
(The perl docs clearly fail the "modifiable" test, and maybe fail the
other two - the license and what Tom says seem to be a slightly out of
sync on that, but he has promised to clarify in future versions.)
Havoc Pennington ==== http://pobox.com/~hp
------------------------------
Date: 22 May 1998 16:38:34 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: More double standards out of the FSF
Message-Id: <6k49ma$23j$1@client2.news.psi.net>
robert havoc pennington (hp@pobox.com) wrote on MDCCXXV September
MCMXCIII in <URL: news:wsnzpga7qsq.fsf@harper.uchicago.edu>:
++
++ I am not sure what else one expects RMS[1] to do. He has his values
++ and goals; he puts on his task list what he thinks needs to be done in
++ order to achieve them. It's not like he mentioned Tom personally, he
++ just said "we need some free[2] Perl docs." Just like he says "we need
++ a free version of Motif," or "we need a free Qt," or whatever it may
++ be. Perl docs didn't get singled out, and neither did Tom C. Yet Tom
++ C. is the only person here flaming.
The exact quote is:
> We very urgently need documentation for some parts of the system that
> already exist.
>
> * A good free manual for Perl. (There are proprietary books, but
> these are no good, because they are being withheld from our
> community by their owners.)
Stepping over the (for me surprising) case that Perl is considered
part of the GNU system, it suggest the only good manuals for Perl are
the books. That is a LIE. A very bad LIE. It's ok to say that you don't
think the license of the documentation isn't free enough, but that is
not what the page says. It's is strongly suggesting there is no good
manual but books available.
Abigail
--
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'
------------------------------
Date: 22 May 1998 16:48:13 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: More double standards out of the FSF
Message-Id: <6k4a8d$23j$2@client2.news.psi.net>
Russ Allbery (rra@stanford.edu) wrote on MDCCXXV September MCMXCIII in
<URL: news:m3pvh6n5dl.fsf@windlord.Stanford.EDU>:
++ In comp.lang.perl.misc, Barry Margolin <barmar@bbnplanet.com> writes:
++
++ > Anyway, if the name is sacrosanct (and I believe even RMS agrees with
++ > this, as I think he pushed for the non-GNU Emacs's to have distinct
++ > names like Xemacs), I would just call my version PerlFixed or something
++ > like that if I fixed a bug in Perl.
++
++ I would presume that if you fixed a bug in Perl, you would submit the
++ patch back the maintainers rather than simply forking your own version.
++ As a matter of simple politeness.
Yes, but what if the maintainers disagree and don't put the patch in?
Maybe you have a patch that speeds up a very specific case, only relevant
for you and a few others, but it would slow down perl in general.
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: Fri, 22 May 1998 16:46:36 GMT
From: phenix@interpath.com (John Moreno)
Subject: Re: news/mail posting
Message-Id: <1d9fhta.9avth54nt2yoN@roxboro0-037.dyn.interpath.net>
Tom Phoenix <rootbeer@teleport.com> wrote:
> On Fri, 22 May 1998, Pete Moss wrote:
>
> > How do you interact with the news server (innd)
>
> I use a module. :-) See Net::NNTP from CPAN. Hope this helps!
I was going to say that I use a module for talking to the STMP sever and
I would (and do) do the same for talking to the NNTP server.
BTW:
> Organization: Society for the Elimination of Unwarranted Excess
> Superfluous Text in Internet Header Lines
Is a bit vague, how about:
Organization: Society for the Elimination of Unnecessary and/or
Excessively Superfluous Text in Internet Header Fields
That way we'll really know what your organization is against.
--
John Moreno
------------------------------
Date: Fri, 22 May 1998 17:13:07 -0400
From: Michael Rondeau <sales@mmcc.net>
Subject: Parsing Problem with MAC's
Message-Id: <3565EA63.4D83FB83@mmcc.net>
Is anyone aware of any Problems using the ReadParse subroutine in
cgilib.pl with MACs.
I've got a script I wrote which allows users to manipulate their web
page content via their browser, however MACs only seem to post 255
characters and then truncate the remaining text.
For an online example of this problem, check out
http://www.flashpage.net/admin/nr & use the add an entry function.
Much Thanks In Advance
Michael Rondeau
President
Multimedia Concepts Corp.
------------------------------
Date: Fri, 22 May 1998 16:00:11 GMT
From: robert havoc pennington <hp@pobox.com>
Subject: Re: Quiet summary
Message-Id: <wsnpvh61ek4.fsf@harper.uchicago.edu>
mrw@malay.entropic.co.uk (Mike Whitaker) writes:
>
> I don't think the two clauses you quote are necessarily using the phrase
> 'commercial' use the same way.
> The Open Source definition is about 'making use of the software in a
> commercial environment'. The PerlFAQ one is about 'making a profit
> directly by selling a portion of the document'.
>
The Open Source Definition requires both kinds of commercial use to
be permitted.
Havoc Pennington ==== http://pobox.com/~hp
------------------------------
Date: Fri, 22 May 1998 16:05:29 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Phil Buckley <pbuckley@tiac.net>
Subject: Re: Re-direct question
Message-Id: <Pine.GSO.3.96.980522090328.29577b-100000@user2.teleport.com>
On Fri, 22 May 1998, Phil Buckley wrote:
> I figure I'm missing something simple, can someone give me hand, feel
> free to bash me if it's very obvious.
I didn't see any obvious mistakes in the Perl code. Perhaps you're
mis-implementing the protocol you're using. You can find more information
on the protocol in the relevant docs, FAQs, and newsgroups. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 22 May 1998 09:15:08 -0700
From: "Larry Rosler" <lr@hpl.hp.com>
Subject: Re: Re-direct question
Message-Id: <6k48ai$8fu@hplntx.hpl.hp.com>
[posted and emailed]
Phil Buckley wrote in message <35659ED3.D7087E8D@tiac.net>...
...
>if ($host eq $res_dom) { # If they are coming from Varian
...
if ($host =~ /\Q$res_dom\E$) { # If they are coming from Varian
--
Larry Rosler
Hewlett-Packard Laboratories
lr@hpl.hp.com
------------------------------
Date: Fri, 22 May 1998 18:12:48 +0200
From: Christoph Wernli <cwernli@dwc.ch>
To: Phil Buckley <pbuckley@tiac.net>
Subject: Re: Re-direct question
Message-Id: <3565A400.1B412911@dwc.ch>
Phil Buckley wrote:
>
> I'm just trying to send any visitors from varian.com to one page, and
> anyone else to another...
>
> #!/usr/local/bin/perl
> # Simple domain restriction script
> # Created by Phil Buckley
> # Created on: 5/21/98 Last Modified on: 5/21/98
> # Version 1.0
>
> ################################################################
> # Variables
>
> $res_dom = "varian.com";
> $varian_url = "http://www.tiac.net/users/dam4/varian.shtml";
> $other_url = "http://www.tiac.net/users/dam4/private.shtml";
>
> ################################################################
>
> $host = "$ENV{'REMOTE_HOST'}";
>
> if ($host eq $res_dom) { # If they are coming from Varian
if ($host =~ m/$res_dom/){ # $host could be 'foo.varian.com'
> print "Location: $varian_url\n\n";
> }
> else { # For any other domain
> print "Location: $other_url\n\n";
> }
HTH, -werns
------------------------------
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 2690
**************************************