[17366] in Perl-Users-Digest
Perl-Users Digest, Issue: 4788 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Nov 1 21:10:35 2000
Date: Wed, 1 Nov 2000 18:10:14 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <973131013-v9-i4788@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 1 Nov 2000 Volume: 9 Number: 4788
Today's topics:
Newbie: seeing scalars within require files? <spam@pagans.demon.co.uk>
Re: Newbie: seeing scalars within require files? <Jonathan.L.Ericson@jpl.nasa.gov>
Re: Newbie: seeing scalars within require files? <spam@pagans.demon.co.uk>
Re: OT: Yes there _are_ stupid questions. Anyone colle <nospam@david-steuber.com>
Re: OT: Yes there _are_ stupid questions. Anyone colle <nospam@david-steuber.com>
Re: OT: Yes there _are_ stupid questions. Anyone colle (Martien Verbruggen)
Re: Perl Question <james@NOSPAM.demon.co.uk>
Re: Perl Question (Mark-Jason Dominus)
Re: Perl Question (Martien Verbruggen)
Perl style and module searches <dave_at_hm@hotmail.com>
Re: Perl style and module searches <Jonathan.L.Ericson@jpl.nasa.gov>
Re: Printing a file under Win95 <Jonathan.L.Ericson@jpl.nasa.gov>
Re: SMS - text messaging <sjd256@yahooNOSPAM.co.uk>
Re: Stultiloquent Queries (was: even or odd?) <nospam@david-steuber.com>
Re: Using 'format' and 'write' multiple times? (Mark-Jason Dominus)
Re: Using 'format' and 'write' multiple times? (Mark-Jason Dominus)
Re: using regex to insert data (Mark-Jason Dominus)
Re: Want to process all files less than 24 hours old <mark-lists@webstylists.com>
Re: Want to process all files less than 24 hours old (Jerome O'Neil)
Re: Which is the best PERL learning book? (Mark-Jason Dominus)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 1 Nov 2000 22:49:42 +0000
From: Robin Bowen <spam@pagans.demon.co.uk>
Subject: Newbie: seeing scalars within require files?
Message-Id: <PCO5cJAG4JA6EwBP@pagans.demon.co.uk>
Hi,
I'm trying to build a subroutine library, and also to declare common
scalars. I've a file that contains various routines, and sets various
variables. Currently I'm using this file in this manner...
file1.lib:
--------------
#!/usr/bin/perl
use strict;
my $cont1 = 'test';
sub hello {
print "hello!\n";
}
--------------
file2.pl:
--------------
#!/usr/bin/perl
use strict;
require "file1.lib";
&hello;
--------------
Calls to &hello work, but is there any way I can reference $cons1 from
within file2.pl? I've spent hours looking through the documentation but
can't see how to do this. Any help or pointers would be appreciated!
--
Robin Bowen
------------------------------
Date: Wed, 01 Nov 2000 15:47:53 -0800
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Newbie: seeing scalars within require files?
Message-Id: <3A00ABA9.C137168D@jpl.nasa.gov>
Robin Bowen wrote:
> Calls to &hello work, but is there any way I can reference $cons1 from
> within file2.pl? I've spent hours looking through the documentation but
> can't see how to do this. Any help or pointers would be appreciated!
perldoc -f package
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: Thu, 2 Nov 2000 01:17:11 +0000
From: Robin Bowen <spam@pagans.demon.co.uk>
Subject: Re: Newbie: seeing scalars within require files?
Message-Id: <1XqnZIAXCMA6EwWO@pagans.demon.co.uk>
In article <3A00ABA9.C137168D@jpl.nasa.gov>, Jon Ericson <Jonathan.L.Eri
cson@jpl.nasa.gov> writes
>Robin Bowen wrote:
>> Calls to &hello work, but is there any way I can reference $cons1 from
>> within file2.pl? I've spent hours looking through the documentation but
>> can't see how to do this. Any help or pointers would be appreciated!
>
>perldoc -f package
>
>Jon
Thanks for the info Jon - easy when you know how! :-)
--
Robin Bowen
------------------------------
Date: Wed, 01 Nov 2000 23:35:23 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: OT: Yes there _are_ stupid questions. Anyone collect them?
Message-Id: <m3n1fjw9j8.fsf@solo.david-steuber.com>
tjla@guvfybir.qlaqaf.bet (Gwyn Judd) writes:
' >eg. How do I write a Perl script to grab the daily Dilbert cartoons
' >that I can run from a cron job so that I don't have to visit the site
' >and see all the ads? (A trivial script to write ;-)
'
' How is that ethically questionable? I *do* that from a cronjob and have
' it mail me the cartoons every day because I can't stand waiting for the
' page to load. If they only want people to read the pages online I'm sure
' there are ways of making people do so. Last time I looked I'm sure I
' didn't see any notice saying 'You can only look at these cartoons
' through a web-browser such as netscape or explorer'.
Maybe that is a bad example. I once had a script that would generate
the proper link for an <img> tag to go in a webpage I had. I don't do
that anymore.
How about some bozo asking for a script that scans ports and then
launches various attacks against specified hosts? I seem to recall
the term `script kiddies' comming from somewhere like that.
Maybe my question is a stupid question to begin with.
--
David Steuber | Perl apprentice. The axe did not stop the
NRA Member | mops and buckets from flooding my home.
ICQ# 91465842
*** http://www.david-steuber.com/ ***
------------------------------
Date: Wed, 01 Nov 2000 23:38:52 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: OT: Yes there _are_ stupid questions. Anyone collect them?
Message-Id: <m3itq7w9df.fsf@solo.david-steuber.com>
logan@cs.utexas.edu (Logan Shaw) writes:
' [1] It didn't actually grab the images -- it just built "IMG SRC"
' (i.e. inline) links to them.
A long time ago, on a server far, far away, I had such a script. Then
I heard about how people who did that sort of thing were getting into
legal hot water and I bailed out.
--
David Steuber | Perl apprentice. The axe did not stop the
NRA Member | mops and buckets from flooding my home.
ICQ# 91465842
*** http://www.david-steuber.com/ ***
------------------------------
Date: Wed, 01 Nov 2000 23:43:25 GMT
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: OT: Yes there _are_ stupid questions. Anyone collect them?
Message-Id: <slrn901akt.vf1.mgjv@verbruggen.comdyn.com.au>
On Wed, 01 Nov 2000 23:35:23 GMT,
David Steuber <nospam@david-steuber.com> wrote:
> tjla@guvfybir.qlaqaf.bet (Gwyn Judd) writes:
>
> ' >eg. How do I write a Perl script to grab the daily Dilbert cartoons
> ' >that I can run from a cron job so that I don't have to visit the site
> ' >and see all the ads? (A trivial script to write ;-)
> '
> ' How is that ethically questionable? I *do* that from a cronjob and have
> ' it mail me the cartoons every day because I can't stand waiting for the
> ' page to load. If they only want people to read the pages online I'm sure
> ' there are ways of making people do so. Last time I looked I'm sure I
> ' didn't see any notice saying 'You can only look at these cartoons
> ' through a web-browser such as netscape or explorer'.
>
> Maybe that is a bad example. I once had a script that would generate
> the proper link for an <img> tag to go in a webpage I had. I don't do
> that anymore.
>
> How about some bozo asking for a script that scans ports and then
> launches various attacks against specified hosts? I seem to recall
> the term `script kiddies' comming from somewhere like that.
Or someone who wants to 'hide' their IP address, so they can run up
page counts and get more money for their banner Ads?
Or someone who wants to know how to read /etc/shadow because his
password cracker stopped working?
Or someone asking how to write a bulk email program that harvests
email addresses from Usenet and then sends "GET RICK QUICK(LY) !!!!!!"
messages?
Or someone who wants to find out as much information about the 'user
connecting to their website'?
Or someone who wants to know how to generate packet storms in Perl?
I ignore them. We've sen most of those here, or on other programming
groups. Idiots are a fact of life. You don't have to associate with
them, though.
Martien
--
Martien Verbruggen |
Interactive Media Division | The world is complex; sendmail.cf
Commercial Dynamics Pty. Ltd. | reflects this.
NSW, Australia |
------------------------------
Date: Thu, 2 Nov 2000 01:20:00 +0000
From: James Taylor <james@NOSPAM.demon.co.uk>
Subject: Re: Perl Question
Message-Id: <ant020100339fNdQ@oakseed.demon.co.uk>
In article <slrn9014v6.vf1.mgjv@verbruggen.comdyn.com.au>, Martien Verbruggen
<URL:mailto:mgjv@tradingpost.com.au> wrote:
>
> I won't read them, normally. The only reason that I'm reading this is
> that Tad followed up to the original post. My score file marks
> certain posts as potetntially being of higher value, and some as
> potentially of lower value. Of course, some posters, subjects,
> origins or reference headers will completely disqualify a post, and
> those never even show up on my screen.
It's spooky to think that a choice of subject line could render my
post invisible to a number of knowledgeable people. It feels like an
indiscriminate censorship, or one might even go as far as to call it
unfair discrimination. Although I have to admit I'm secretly tempted
to discriminate too. ;-)
My newsreader does not have a scorefile system, in fact it's killfile
system is very limited anyway. Which newsreader do you use, and is the
scorefile system an integral part of it or a separate utility?
Do many newsreaders support scorefiles (as opposed to killfiles)?
--
James Taylor <james (at) oakseed demon co uk>
PGP key available ID: 3FBE1BF9
Fingerprint: F19D803624ED6FE8 370045159F66FD02
------------------------------
Date: Wed, 01 Nov 2000 19:10:50 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Perl Question
Message-Id: <3a006ab8.51f6$18@news.op.net>
Keywords: Bootes, manuscript, oblate, raw
In article <ant0117327a1fNdQ@oakseed.demon.co.uk>,
James Taylor <james@NOSPAM.demon.co.uk> wrote:
>I'm curious about your suggestion that people actually skip articles
>that do not have a descriptive subject.
Probably some do and some don't. I usually do.
If you use a descriptive subject line, some people will skip it and
some won't. The difference is that the people who skip it are the
ones who are not interested in the subject. With 'Perl Question', the
poster fails to select the audience that might prove to be helpful.
I also kill off posts that contain 'urgent' because I figure that it's
probably too late by the time I get to them anyway. I also kill off
posts with subjects that end in '!', because experience has shown that
they're not ususally worth my while.
--
@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f|ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
------------------------------
Date: Thu, 02 Nov 2000 01:45:09 GMT
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Perl Question
Message-Id: <slrn901hp5.l2.mgjv@verbruggen.comdyn.com.au>
\begin[more]{offtopic}
On Thu, 2 Nov 2000 01:20:00 +0000,
James Taylor <james@NOSPAM.demon.co.uk> wrote:
> In article <slrn9014v6.vf1.mgjv@verbruggen.comdyn.com.au>,
> Martien Verbruggen wrote:
> >
> > I won't read them, normally. The only reason that I'm reading this is
> > that Tad followed up to the original post. My score file marks
>
> My newsreader does not have a scorefile system, in fact it's killfile
> system is very limited anyway. Which newsreader do you use, and is the
> scorefile system an integral part of it or a separate utility?
slrn
Most newsreaders put a header in the post that identifies them. Mine's
not an exception :).
> Do many newsreaders support scorefiles (as opposed to killfiles)?
Hmm. I don't know. I have only used slrn for quite some time now. I
believe that knews had something like that as well, and I suspect that
tin is more sophisticated nowadays, too. You could ask on
comp.software.newsreader (I believe that's its name).
\end{offtopic}
Martien
--
Martien Verbruggen |
Interactive Media Division | Failure is not an option. It comes
Commercial Dynamics Pty. Ltd. | bundled with your Microsoft product.
NSW, Australia |
------------------------------
Date: Wed, 01 Nov 2000 16:53:50 -0800
From: Dave E <dave_at_hm@hotmail.com>
Subject: Perl style and module searches
Message-Id: <3A00BB1E.41FDF922@hotmail.com>
I have 2 newbie questions:
1) Is there a style, or "best practices" guide for Perl?
I am a network administrator that inherited some Perl scripts I have
to maintain. I taught myself the basics and can, imho,
code in Perl fairly well; my scripts do what I want them to. But, when
I look at other people's scripts -- they don't look anything like what I
do :(
Is there a good source for example scripts that I can look at?
Something that says "this part is included because ..." I've found
"perlstyle" that came with my install of Perl, but I'd really like some
solid examples to look over. Not modules though... way to confusing
for my newbie mind. I just need an anatomy of a basic Perl script.
2) Is there some searchable index for module capabilities?
I noticed, in another message in this group, the "perldoc" search
utility; very useful but I am looking for something more. Is
there some website (or place) that has a searchable list of modules --
something that can search the "capabilities of" rather than
the "name of." My last challenge was a good example. I wanted to look
up the username of the account that had a particular
NT SID. How was I suppose to know the Win32 module did this? (besides
making an educated guess). Is there some place
I could search for "NT and SID" and get a list of all the modules that
do things with these?
Thanks for reading.
David...
------------------------------
Date: Wed, 01 Nov 2000 17:46:39 -0800
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Perl style and module searches
Message-Id: <3A00C77F.64735E4@jpl.nasa.gov>
Dave E wrote:
> 1) Is there a style, or "best practices" guide for Perl?
> 2) Is there some searchable index for module capabilities?
Instead of answering your questions, I'm going to point to two resources
that have been helpful to me.
http://www.stonehenge.com/merlyn/
Randal's magazine column scripts are annotated so you can know why he
uses that style.
http://search.cpan.org/
Poke around that catagories and monitor the new modules list.
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: Wed, 01 Nov 2000 15:02:26 -0800
From: Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov>
Subject: Re: Printing a file under Win95
Message-Id: <3A00A102.1EFF172C@jpl.nasa.gov>
Richard Hainsworth wrote:
>
> All I have found so far are Graphic Display Interface (GDI) functions
> accessible from the Win32API. The documentation assumes calls from a C
> program.
Have you searched CPAN?
<http://search.cpan.org/search?mode=module&query=Win32>
Jon
--
Knowledge is that which remains when what is
learned is forgotten. - Mr. King
------------------------------
Date: Thu, 02 Nov 2000 01:32:16 +0000
From: Steve <sjd256@yahooNOSPAM.co.uk>
Subject: Re: SMS - text messaging
Message-Id: <3A00C420.2914@yahooNOSPAM.co.uk>
Richard J. Rauenzahn wrote:
>
<snip>
>
> I wish many posters on clpm would try to write clearer questions.
Sorry I thought it was clear ;-) - I want visitors to my site to be
able to send text messages (sms) from my site to a mobile phone
of their choice. They type a text message into an input box - then
type the phone number and then press send and it's sent to the phone.
Any Ideas?
cheers
Steve
------------------------------
Date: Thu, 02 Nov 2000 00:09:44 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: Stultiloquent Queries (was: even or odd?)
Message-Id: <m366m7w7xz.fsf@solo.david-steuber.com>
tchrist@perl.com (Tom Christiansen) writes:
' --tom, who swore he would throttle the next person to ask this
' incredibly idiotic question
You mean this question had been asked before? How many VB programmers
are there?
*the word `programmer' is used rather ironically in this case.
--
David Steuber | Perl apprentice. The axe did not stop the
NRA Member | mops and buckets from flooding my home.
ICQ# 91465842
*** http://www.david-steuber.com/ ***
------------------------------
Date: Wed, 01 Nov 2000 19:55:45 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Using 'format' and 'write' multiple times?
Message-Id: <3a007533.5333$1d4@news.op.net>
Keywords: aerobic, bribe, osteopathy, remitted
In article <8tkqs2$9t7$1@nnrp1.deja.com>,
R.Joseph <streaking_pyro@my-deja.com> wrote:
>format MAIL =
>@<<<<<<<<<<< @<<<<<<<<<< @<<<<<<<<<...
>$data $data $data
>.
>write(MAIL);
>
>open (FILE ...);
>while(<FILE>) {
>format MAIL =
>@<<<<<<<<<<< @<<<<<<<<<<
>$from_file $from_file
>.
>write(MAIL);
>}
'format' is a compile-time declaration. Putting it inside the 'while'
loop is not going to redefine it at run time, or to execute it
repeatedly. In this way, it is a little bit similar to a subroutine
definition.
If you need to use more than one different format on the same
filehandle, you can use the $~ variable to change the format of the
currently-selected filehandle, documented in 'perlvar'.
--
@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f|ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
------------------------------
Date: Wed, 01 Nov 2000 20:03:21 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Using 'format' and 'write' multiple times?
Message-Id: <3a007707.5357$c1@news.op.net>
Keywords: McGuire, lactate, meridian, template
In article <8tlnkb$1a0$1@nnrp1.deja.com>,
R.Joseph <streaking_pyro@my-deja.com> wrote:
>> It might be a good idea to post the real code.
>
>That was just psuedo-code to show what was happening - if it helps,
>PRETEND there is something very very important in thoose varibles that
>will get printed.
The reason Gwyn is asking for the real code is that it often happens
that someone will come in here, show some faked-up code that they
*think* captures the essence of the problem, when in reality the
problem is something else entirely, and they have suppressed
all the information that would have let us figure out what it was.
> The real code is much longer than that
Then you should try to show the relevant parts of the real code.
>I was just trying to show the general flow and structure of things to
>see if some nice person could help me - not make fun of me.
Nobody was making fun of you. And if I might be allowed to make a
suggestion: When you ask a question, and someone offers you advice,
it is not a good idea to get offended just because the advice was not
what you wanted to hear. Sometimes the advice is even good.
--
@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f|ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
------------------------------
Date: Wed, 01 Nov 2000 19:41:16 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: using regex to insert data
Message-Id: <3a0071da.52ba$c3@news.op.net>
Keywords: cobble, rajah, significant, wrathful
In article <MPG.1468e5fadeab350d98ae88@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
> $search =~ s/\Q$var\E/$array[$i++]$var/g;
>
>A solution looping on index() and substr() is likely to be faster...
I don't understand why you think so. Regex search for a literal
string with no metacharacters is likely to be about as fast as substr.
With the regex match, the loop logic takes place in C, instead of
Perl, and solutions that dispatch fewer Perl opcodes usually win when
everything else is equal.
Here I can't think of any counterbalancing factor that might make the
regex take longer. I would guess that the other big cost here is that
the regex solution rewrites the string repeatedly, each time it
inserts a new item. But the obvious index-substr solution would do
that too.
Or so it seems to me, anyway.
Something that might be worth trying is to accumulate an array of
items that get assembled into the result string afterwards, perhaps
something like this:
$pos = 0;
$len = length($var);
while (($next = index($search, $var, $pos)) >= 0) {
push @items, substr($search, $pos, $next-$pos), $var, $array[$i++];
$pos = $next + $len;
}
$result = join '', @items;
This attempts to get a win by not rewriting the string many times.
The tradeoff is that it dispatches many opcodes. I have no idea
whether it actually wins or not.
--
@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f|ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
------------------------------
Date: Wed, 01 Nov 2000 15:32:06 -0800
From: Mark Thompson <mark-lists@webstylists.com>
Subject: Re: Want to process all files less than 24 hours old
Message-Id: <2l610tsbuqeaj263lr67adb3p0b671611d@4ax.com>
On Wed, 01 Nov 2000 21:53:57 GMT, jerome@activeindexing.com (Jerome
O'Neil) wrote:
>Its a fine way of doing things. Just ensure you use File::Find when
>you do it.
Well, had my plans of how I was going to do this until I saw you
mention File::Find and I really can't find much on it that would help
me use it (I found some cryptic documentation but even the Perl 5
books that I have don't cover this to any level but they cover the old
methods extensively.)
Does anyone know of a good tutorial on doing things using this method
rather than the old methods?
------------------------------
Date: Thu, 02 Nov 2000 00:02:25 GMT
From: jerome@activeindexing.com (Jerome O'Neil)
Subject: Re: Want to process all files less than 24 hours old
Message-Id: <la2M5.1452$q81.360295@news.uswest.net>
Mark Thompson <mark-lists@webstylists.com> elucidates:
> On Wed, 01 Nov 2000 21:53:57 GMT, jerome@activeindexing.com (Jerome
> O'Neil) wrote:
>
>>Its a fine way of doing things. Just ensure you use File::Find when
>>you do it.
>
> Well, had my plans of how I was going to do this until I saw you
> mention File::Find and I really can't find much on it that would help
> me use it (I found some cryptic documentation but even the Perl 5
> books that I have don't cover this to any level but they cover the old
> methods extensively.)
Well, lets take another tac on this, then. What in particular do
you find 'cryptic' about the documentation for File::Find? I find it
pretty well documented, myself, and am always curious as to what parts
others find problematic.
I think once we know that, you'll be much enlightened.
--
"Civilization rests on two things: the discovery that fermentation
produces alcohol, and the voluntary ability to inhibit defecation.
And I put it to you, where would this splendid civilization be without
both?" --Robertson Davies "The Rebel Angels"
------------------------------
Date: Wed, 01 Nov 2000 20:24:33 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Which is the best PERL learning book?
Message-Id: <3a007bff.53d3$390@news.op.net>
Keywords: Bolshevik, propyl, sleepy, whirligig
In article <MPG.1467c5e685fc312298ae83@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
>The blurb says it uses Perl 5.6 throughout, which is a Good Thing.
>"Learning Perl" is certainly getting 'long in the tooth'. Other than
>that, who knows whether to recommend it?
I got Wrox to send me a copy, and I'm afraid I didn't really think
much of it. It is another very large, thick book, which, despite its
title, appears to be trying to be all things to all people. The
organization is not really conducive to beginners; it has that
reference-manual organization where there is a big fat chapter with
everything there is to know about arrays and then another chapter with
everything there is to know about regexes, even the things no beginner
would want to know.
There isn't much discussion of program design, or stepwise refinement,
or other general topics. It mostly seems to be a language-reference
with tutorial, which is fine for people who are already programmers,
and not so good for the target audience that they claim.
I found a number of technical errors, although I didn't look very
hard.
It's nowhere near as bad as 'Perl for Dummies', but that's about all I
can say for it.
--
@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f|ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print
------------------------------
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 4788
**************************************
