[6535] in Perl-Users-Digest
Perl-Users Digest, Issue: 160 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 22 15:07:20 1997
Date: Sat, 22 Mar 97 12:00:22 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 22 Mar 1997 Volume: 8 Number: 160
Today's topics:
Re: [Q] HTTP client in perl? (Nathan V. Patwardhan)
Re: A Call for Clarity (Schwartzian Transform Considere (Greg Bacon)
case sensativity mirage@tsil.net
Re: case sensativity <rootbeer@teleport.com>
Re: Converting Perl to c++ <minaret@sprynet.com>
download site for suid? (Rajagopal Ramchandran)
Re: download site for suid? <rootbeer@teleport.com>
Re: ftplib.pl for Perl 5 <rootbeer@teleport.com>
Help ! PWS and Perl for Win95 <mcamilo@sprynet.com>
need help on "open F, '+< myfile';" (Long Yang)
Re: need help on "open F, '+< myfile';" (Nathan V. Patwardhan)
Re: need help on "open F, '+< myfile';" <rootbeer@teleport.com>
perl 5.003 make test hanging on DB_File (dynamic) <gtk@walsh2.med.harvard.edu>
Perl CGI Help (was: Re: how do i... (Billy Chambless)
Re: Perl Data Structures Cookbook. Wher did it go? <rob@netcentral.net.no.spam>
Re: Perl Data Structures Cookbook. Wher did it go? <tchrist@mox.perl.com>
Re: Perl for win95 <kk@magi.com>
Re: Perl script..help! (Geoffrey Hebert)
Re: Perl under AIX: HELP!!! <minaret@sprynet.com>
pod2man & numbered =item list rick@myra.com
Re: q: c style include command in perl? (Simon Hyde)
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: What's a good Perl book? (Nathan V. Patwardhan)
When is a perl program too big? (Geoffrey Hebert)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 22 Mar 1997 16:30:12 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: [Q] HTTP client in perl?
Message-Id: <5h11ek$29c@fridge-nf0.shore.net>
amas@lhr-sys.dhl.com wrote:
: I would like to have a robot that would go through my site and index
: all the links it comes across. Has anybody done this and would it
: work independently of platform?
Then you definitely want the LWP modules!
Try: http://www.perl.com/CPAN/modules/by-module/LWP/
HTH!
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: 22 Mar 1997 18:18:02 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
To: tchrist@mox.perl.com (Tom Christiansen)
Subject: Re: A Call for Clarity (Schwartzian Transform Considered Scary)
Message-Id: <5h17oq$b52$1@info.uah.edu>
[Posted and mailed]
In article <5guti0$hsm$1@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> writes:
: If it's at all possible, I would ask that whenever you used
: the ST, that you would *please* reference its documentation in
: http://www.perl.com/all_about/sort.html to help allay these black marks
: against Perl.
If I may, I would like to propose an amendment to your motion: whenever
you used the ST, thou shalt comment thy ST thusly:
(From <8cn2vkfy8h.fsf@gadget.cscaper.com>) :
@sorted_list =
map { $_->[0] } # extract first element of...
sort { # elements sorted by
$a->[1] <=> $b->[1] # second element
or $a->[2] <=> $b->[2] # or third element
or $a->[3] <=> $b->[3] # or fourth element
or $a->[4] <=> $b->[4] # or fifth element
or $a->[0] cmp $b->[0] # or first element (fallback)
} map { [ # from the list of lists resulting from...
$_, # the original element and
split /[.;]/, $_ # each element split thusly
] } @list; # in the original list
A sort of odd consequence of the ST is that it makes for documentation
that reads like a sentence. With the commentary out to the right, even
a python prog^W^Wfirst grader could see what the code does (though a
deep understanding might still be forthcoming).
Another solution would be to provide simpler lispisms in
<perlfunc/"map">, <perlfunc/"sort">, <perlfunc/"grep">, et al.
Zum Beispiel:
# produce pricing, example 1
@veggies = qw( cucumber:4.33 zucchini:3.34 tomato:4.48 );
@by_price =
sort { $a->[1] <=> $b-[1] }
map { [ split /:/, $_ ] }
@veggies;
# ...or by product name, example 2
@by_name =
sort { $a->[0] cmp $b->[0] }
map { [ split /:/, $_ ] }
@veggies;
Although these may seem a little scary at first, they really aren't.
Read example 2 from the end to the beginning:
@split_veggies = map { [ split /:/, $_ ] }, @veggies;
@by_name = sort { $a->[0] cmp $b->[0] } @split_veggies;
Can you see how these two statements are equivalent to example 2?
Think of it like algebra: the substitution property holds, so you
can substitute the code C<map { [ split /:/, $_ ] }, @veggies>
for @split_veggies in the second statement. Voila! You then get
example 2 back. Simple, isn't it?
Of course, I'd rather mess with STs all day than have to even *think*
about wrapping my head around scoping of lexicals in closures. But
that's just me. :-)
Greg
--
Greg Bacon <gbacon@cs.uah.edu>
Unix / Perl Consultant
Perl Institute Partner - http://www.perl.org/
------------------------------
Date: 22 Mar 1997 13:07:49 GMT
From: mirage@tsil.net
Subject: case sensativity
Message-Id: <5h0lj5$48i$3@dropit.pgh.net>
Is there anyway to keep Perl, Java, JavaScript, etc from being
case sensitive?
Is there any actual use of case sensitivity or is this yet another
unfortunate instance of the carry-over of one of C's worst language
features? I know C is case sensitive because of it's origin as a
replacement for assembly language which uses macros.
I don't know about others but I find mixed case greatly improves
script readability. Why do people keep developing new languages that
omit this freedom? I am so used to having the flexibilty of mixing my
case in other languages that it makes working with C, Perl, Java,
etc, such a chore.
henry
mirage@tsil.net
www.novaord.com/Mirage/
------------------------------
Date: Sat, 22 Mar 1997 09:33:49 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: mirage@tsil.net
Subject: Re: case sensativity
Message-Id: <Pine.GSO.3.96.970322092200.12067C-100000@kelly.teleport.com>
On 22 Mar 1997 mirage@tsil.net wrote:
> Is there anyway to keep Perl, Java, JavaScript, etc from being
> case sensitive?
Java and JavaScript, no. Perl, yes: First you download the source to
Perl, then.... :-)
If you don't want to worry about whether a variable name is upper or lower
case, just always use lower case. Now it's easy to remember which it was.
If you mistype, Perl will catch it and let you know. (Especially if you
'use strict'.)
And if you don't like @ARGV and %SIG, you could even make a 'use
lowercase' pragma. Eek!
It's actually a big advantage to be able to make two related variables
have names which differ only in case, although this is best if the code
which uses both is just a few lines. For example...
$line = <IN>;
($LINE = line) =~ tr/A-Za-z/N-ZA-Mn-za-m/; # ROT-13
If we had to call the second var $line_rot_13_ed, that would be much
uglier and more confusing, don't you think? (Okay, you're welcome to
disagree. :-)
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 22 Mar 1997 15:58:12 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: Converting Perl to c++
Message-Id: <01bc36d9$a64564a0$56eeaec7@cactus>
> Does anyone know of a program that can convert a perl program into c++.
There is a PERL to C program out there. You might try the CPAN archive at:
http://www.perl.com/CPAN/
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: 21 Mar 1997 22:56:08 GMT
From: ramch@xi.cs.fsu.edu (Rajagopal Ramchandran)
Subject: download site for suid?
Message-Id: <5gv3m8$ppg@news.fsu.edu>
Hello people,
Do you know of any site where I can download the suidperl for free?
Please email me if you do.
Thanks
RR
------------------------------
Date: Sat, 22 Mar 1997 11:31:41 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: ramch@nu.cs.fsu.edu
Subject: Re: download site for suid?
Message-Id: <Pine.GSO.3.96.970322113001.18839A-100000@kelly.teleport.com>
On 21 Mar 1997, Rajagopal Ramchandran wrote:
> Do you know of any site where I can download the suidperl for free?
Sure. It comes with perl; you need only to compile the perl package to get
it. (But it's not usually something you execute yourself; perl runs it for
you if and when it's needed.)
http://www.perl.org/CPAN/
http://www.perl.com/CPAN/
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: Sat, 22 Mar 1997 10:38:22 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: Jeff Dubis <dubis@nortel.com>
Subject: Re: ftplib.pl for Perl 5
Message-Id: <Pine.GSO.3.96.970322103747.12067G-100000@kelly.teleport.com>
On Sat, 22 Mar 1997, Jeff Dubis wrote:
> Does anyone have the ftplib.pl library for Perl5?
Why not use a module from CPAN? Hope this helps!
http://www.perl.org/CPAN/
http://www.perl.com/CPAN/
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: Sat, 22 Mar 1997 10:15:57 -0500
From: Michael Camilo / Glenda Reoyo <mcamilo@sprynet.com>
Subject: Help ! PWS and Perl for Win95
Message-Id: <3333F7AD.100B@sprynet.com>
Help !
I have installed the Microsoft Personal Web Server. I've tried
configuring Perl for Win32 to no avail. I've tried mapping .pl to
c:\perl5\bin\perlIIS.dll and then c:\perl5\bin\perl.exe %s.
All I get is a DOS Window indicating 'Bad command or file name'.
I'm about to give up and install Website 1.1 instead...
------------------------------
Date: 22 Mar 97 11:23:29 -0500
From: yang@cc.memphis.edu (Long Yang)
Subject: need help on "open F, '+< myfile';"
Message-Id: <1997Mar22.112329@latte.memphis.edu>
Hi, there.
Can somebody help me out telling me how to read/write by using "open F, '+<
myfile';"? I have the camel book, but it doesn't say anything 'bout it.
Appreciate any kind of help. (email reply prefered)
Long Yang
yang@cc.memphis.edu
------------------------------
Date: 22 Mar 1997 18:29:09 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: need help on "open F, '+< myfile';"
Message-Id: <5h18dl$e22@fridge-nf0.shore.net>
Long Yang (yang@cc.memphis.edu) wrote:
: Can somebody help me out telling me how to read/write by using "open F, '+<
: myfile';"? I have the camel book, but it doesn't say anything 'bout it.
Do you know how to open a file? If so, it should be very much the same.
What did you try? Why isn't it working? Are you using perl -w?
Here's an example. If you need something that uses an exclusive-write,
you'll have to delve into flock().
#!/usr/local/bin/perl -w
$filename = '/path/foo/bar.txt';
open(RW, "+<$filename") || die("rw error: $!"); # return errors - always!
@lines = <RW>;
seek(RW,0,0); # start at zero'th position.
foreach $line (@lines) {
chop($line);
$line =~ tr/a-z/A-Z/; # all caps - just an example to change the text
# before re-writing it to the file.
print RW $line,"\n";
}
close(RW);
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Sat, 22 Mar 1997 11:51:11 -0800
From: Tom Phoenix <rootbeer@teleport.com>
To: Long Yang <yang@cc.memphis.edu>
Subject: Re: need help on "open F, '+< myfile';"
Message-Id: <Pine.GSO.3.96.970322114300.18839F-100000@kelly.teleport.com>
On 22 Mar 1997, Long Yang wrote:
> Can somebody help me out telling me how to read/write by using "open F,
> '+< myfile';"? I have the camel book, but it doesn't say anything 'bout
> it.
It's on page 162 of the old Camel and page 191 of the new Camel.
You will almost certainly need to use seek(), and possibly tell() to set
the position in the file at which you want to read and write. (It's not
uncommon to need to seek whenever you switch from reading to writing, or
vice versa.) If the file will become shorter as a result of your changes,
you will want truncate().
If you're editing a text file, you would probably prefer to use a
temporary file; Perl will do most of that for you if you use $^I or the
closely-related -i invocation option.
If multiple processes might be needing to modify one file, you could use
the methods in Randal's fourth Web Techniques column, which explains how
to use flock() to avoid problems. Hope this helps!
http://www.stonehenge.com/merlyn/WebTechniques/
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 22 Mar 1997 10:39:16 -0500
From: Gregory Tucker-Kellogg <gtk@walsh2.med.harvard.edu>
Subject: perl 5.003 make test hanging on DB_File (dynamic)
Message-Id: <w2iv2k9brv.fsf@walsh2.med.harvard.edu>
This is on an SGI running IRIX 5.3 and the SGI compiler.
I downloaded the latest 5.003 perl from CPAN, along with the Berkeley
DB. I made and installed libdb.a and libdb.so, and went on to make
perl. Everything fine so far. Then I ran
make test
and after saying
...
making DB_File (dynamic)
...
it got to:
op/write.......ok
lib/anydbm.....ok
lib/bigint.....ok
lib/bigintpm...ok
lib/db-btree...
and then hung. Is there a known problem using a shared DB library?
TIA,
Greg
--
Gregory Tucker-Kellogg
Department of Biological Chemistry and Molecular Pharmacology
Harvard Medical School, Boston MA 02115
"Mojo Dobro" Finger for PGP info
------------------------------
Date: 22 Mar 1997 19:15:26 GMT
From: billy@cast.msstate.edu (Billy Chambless)
To: jn0729a@cage.cas.american.edu (Jon Nathan)
Subject: Perl CGI Help (was: Re: how do i...
Message-Id: <5h1b4e$g95$1@NNTP.MsState.Edu>
[ posted and emailed ]
In article <5gv31i$l3j$1@paladin.american.edu>, jn0729a@cage.cas.american.edu (Jon Nathan) writes:
|> this is what i would like to do:
|> have an html page with a list of links. when a user clicks one of the
|> links, it takes him to a template html page with a specific image on it.
|> sounds like it should be easy, but i'm not sure where to start. how do i
|> pass a variable to the perl script depending on which link in the html
|> page is clicked? any help would be much appreciated - email preferable
This isn't so much a Perl question as a CGI question.
Take a look at :
http://www.perl.com/CPAN/doc/FAQs/cgi/perl-cgi-faq.html
and
http://www.perl.com/CPAN/doc/FAQs/cgi/idiots-guide.html
Also, comp.infosystems.www.cgi.authoring is a good place to ask CGI
questions.
--
"The bottom line on experience is this -- do you get 10 years of experience
or do you get 1 year of experience 10 times?"
--- Steve McConnell in _Code Complete_
------------------------------
Date: Fri, 21 Mar 1997 10:26:10 -0600
From: Rob Huffstedtler <rob@netcentral.net.no.spam>
Subject: Re: Perl Data Structures Cookbook. Wher did it go?
Message-Id: <3332B6A2.6606CC1A@netcentral.net.no.spam>
I clicked on your link, Tom. There's nothing there.
Thanks,
Rob
Tom Christiansen wrote:
>
> [courtesy cc of this posting sent to cited author via email]
>
> In comp.lang.perl.misc,
> Jerome O'Neil <joneil@is.ssd.k12.wa.us> writes:
> :I am having some problems finding Tom's Perl Data Structures Cookbook
> :on-line. The FTP site says it isn't where it used to be, and I'm
> :wondering if it is somewhere else?
>
> type
>
> man perldsc
>
> or
>
> http://www.perl.com/perl/nmanual/html/pod/perldsc.html
>
> --tom
> --
> Tom Christiansen tchrist@jhereg.perl.com
> "Do we define evil as the absence of goodness? It seems only logical
> that shit happens--we discover this by the process of elimination."
> --Larry Wall
------------------------------
Date: 22 Mar 1997 15:26:41 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Perl Data Structures Cookbook. Wher did it go?
Message-Id: <5h0tnh$e1b$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, lvirden@cas.org writes:
:According to Tom Christiansen <tchrist@mox.perl.com>:
:: http://www.perl.com/perl/manual/html/pod/perldsc.html
::Although both should work.
:
:I still get failures regardless of the number of times that I've
:tried this all day.
Hm... there's no reason why
http://www.perl.com/CPAN/doc/manual/html/pod/perldsc.html
should continue to fail. There are a few sites out there that
are like way slow to update, but you shoudln't keep getting them.
I'm currently not redirecting
http://www.perl.com/perl/nmanual/pod/perldsc.html
while things settle.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
It's documented in The Book, somewhere...
--Larry Wall in <10502@jpl-devvax.JPL.NASA.GOV>
------------------------------
Date: 22 Mar 1997 14:55:19 GMT
From: Kerry Keogan <kk@magi.com>
To: Dean Ouellette <deano@nh.ultranet.com>
Subject: Re: Perl for win95
Message-Id: <5h0rsn$7di@news.istar.ca>
Dean Ouellette wrote:
>
> I am leaning Perl, Is there anywhere I can download a free version of Perl
> 5??
>
> Thanks in advance
> Dean Ouellette
Hi,
Here's where I got perl 5.0 for free.
I run it ao a local server called Netscape FastTrack using win95.
Works fine.
ftp://ftp.ActiveWare.com/Perl-Win32/perl5.001m/CurrentBuild/
The file you want to download is called 110-i86.zip (Intel/x86 binary)
just over 1MB in size.
Kerry
------------------------------
Date: Sat, 22 Mar 1997 16:22:21 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: Perl script..help!
Message-Id: <5h102k$4q1$1@news3.microserve.net>
Len Morrissey <len.morrissey@sympatico.ca> wrote:
>MY QUESTION...now I want to simply send the same formatted html page to
>an email.
open (MAIL,"| mail $mailto")
or die "Can not open mail at this time, try later";
print MAIL "FROM: soccer\@microserve.net\n";
print MAIL "SUBJECT: Your Soccer Page Added as Link\n";
print MAIL "$body";
close(MAIL);
check man mail
------------------------------
Date: 22 Mar 1997 15:53:39 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: Perl under AIX: HELP!!!
Message-Id: <01bc36d9$033c0700$56eeaec7@cactus>
> I work at the National Research Council and am trying to compile
> Perl 5.03 Under AIX (4.14) on a RISC 6000 machine.
> Can anyone help? Has anyone compiled PERL under AIX successfully?
The Bull Group has a site with AIX binaries at http://www.bull.de/pub/ that
may be of help.
--
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: Sat, 22 Mar 1997 11:51:11 -0600
From: rick@myra.com
Subject: pod2man & numbered =item list
Message-Id: <859052444.9372@dejanews.com>
I've found that I needed a way to created a numbered list on occassion
rather than just a bulleted list when creating man pages from pod
documentation.
Below is a patch to the pod2man that comes with perl5.003 to do
the following:
When a lines beginning with "=item #" is found, the item will be marked
with the next sequential number, beginning with 1). So, something
like:
=over 4
=item #
Do this first
=item #
Next list item
=back
Would create:
1) Do this first
2) Next list item
An "=back" resets the item counter back to 1.
I've been trying to get a chance to make a similiar change to pod2html,
but just haven't had the time of late. So, I just thot I'd submit this
patch and if someone out there finds it useful as well ... :)
Please note that I am submitting this article via DejaNews and I'm
not certain what'll happen with the whitespace etc, so you'll
probably wanna run "patch --ignore-whitespace"
--- /opt/bin/pod2man Thu Jan 9 15:06:43 1997
+++ pod2man Sat Mar 22 09:13:06 1997
@@ -765,9 +765,12 @@
$indent = pop(@indent);
warn "$0: Unmatched =back in paragraph $. of $ARGV\n" unless defined
$indent;
$needspace = 1;
+ $itemcount = 0;
}
elsif ($Cmd eq 'item') {
+ $itemcount++;
s/^\*( |$)/\\(bu$1/g;
+ s/^#( |$)/sprintf("%2d)%s", $itemcount, $1)/ge;
print STDOUT qq{.Ip "$_" $indent\n};
print qq{.IX Item "$_"\n};
}
--
Rick Tessner rick@myra.com
MYRA Systems Corp.
"A Mathematician is a machine for converting coffee into theorms" - P.
Erdos
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: Sat, 22 Mar 1997 12:29:58 GMT
From: shyde@poboxes.com (Simon Hyde)
Subject: Re: q: c style include command in perl?
Message-Id: <333dd067.7130984@news.uni-stuttgart.de>
On Fri, 21 Mar 1997 21:52:41 GMT, ils@pipcom.com (Scott Card) wrote:
>Is there a c++ style include command in perl for including
>subroutines?
>
try:
unshift(@INC, $path_to_filename);
require($filename);
for require the required file must return true, therefore you should
always remember to put a 1; at the end of the required file.
---
Yours Sincerely,
,
() o /| | |
/\ _ _ _ __ _ _ |___| __| _
/ \| / |/ |/ | / \_/ |/ | | |\| | / | |/
/(__/|_/ | | |_/\__/ | |_/ | |/ \_/|/\_/|_/|__/
/|
\|
(Simon Hyde)
/****************How To Contact Me******************\
| Internet Email: shyde@POBoxes.com |
\***************************************************/
------------------------------
Date: 22 Mar 1997 18:19:16 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <5h17r4$b52$2@info.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 15 Mar 1997 16:47:39 GMT and ending at
22 Mar 1997 08:36:05 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^(>|:|\S+>)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" e-mail address and name.
Totals
======
Total number of posters: 432
Total number of articles: 865
Total number of threads: 369
Total volume generated: 1714.6 kb
- headers: 575.0 kb
- bodies: 1092.3 kb (856.4 kb original)
- signatures: 45.5 kb
Averages
========
Number of posts per poster: 2.0
Number of posts per thread: 2.3
Message size: 2029.8 bytes
- header: 680.7 bytes
- body: 1293.1 bytes (1013.8 bytes original)
- signatures: 53.9 bytes
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
47 74.1 ( 36.1/ 37.9/ 28.3) Tom Phoenix <rootbeer@teleport.com>
46 94.0 ( 34.3/ 52.2/ 41.4) Tom Christiansen <tchrist@mox.perl.com>
43 75.7 ( 24.5/ 51.2/ 30.8) Tad McClellan <tadmc@flash.net>
15 26.6 ( 9.9/ 16.7/ 11.4) dbenhur@egames.com
14 36.4 ( 9.9/ 21.3/ 14.6) Randal Schwartz <merlyn@stonehenge.com>
13 24.2 ( 6.1/ 14.3/ 8.9) Clay Irving <clay@panix.com>
13 17.1 ( 6.7/ 10.4/ 6.7) Eric Bohlman <ebohlman@netcom.com>
9 14.0 ( 5.4/ 8.6/ 3.3) Opera Ghost <agent.email@NetTown.com>
9 205.7 ( 8.0/195.9/195.9) perlfaq-suggestions@mox.perl.com
9 13.9 ( 4.9/ 9.0/ 5.5) Honza Pazdziora <adelton@fi.muni.cz>
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
205.7 ( 8.0/195.9/195.9) 9 perlfaq-suggestions@mox.perl.com
94.0 ( 34.3/ 52.2/ 41.4) 46 Tom Christiansen <tchrist@mox.perl.com>
75.7 ( 24.5/ 51.2/ 30.8) 43 Tad McClellan <tadmc@flash.net>
74.1 ( 36.1/ 37.9/ 28.3) 47 Tom Phoenix <rootbeer@teleport.com>
36.4 ( 9.9/ 21.3/ 14.6) 14 Randal Schwartz <merlyn@stonehenge.com>
26.6 ( 9.9/ 16.7/ 11.4) 15 dbenhur@egames.com
24.2 ( 6.1/ 14.3/ 8.9) 13 Clay Irving <clay@panix.com>
23.5 ( 5.0/ 18.5/ 17.5) 8 Dan Sumption <dan@gulch.demon.co.uk>
22.8 ( 1.1/ 21.7/ 3.8) 2 Odin <chuckr@ptw.com>
17.8 ( 4.5/ 13.3/ 11.0) 8 nvp@shore.net
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
15 Who makes more $$ - Windows vs. Unix programmers?
12 Unix and ease of use (WAS: Who makes more ...)
11 term 'regular expressions' considered undesirable
9 Split
8 [Q] for loop - making multiple arrays
8 What's a good Perl book?
8 Parsing html tag attributes & values in Perl
7 Perl 100 times slower ...
7 How To Pattern Match To The First Occurance Of A Character
7 Multiple substitutions
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
41.5 ( 23.6/ 17.1/ 8.4) 15 Who makes more $$ - Windows vs. Unix programmers?
35.3 ( 0.9/ 34.1/ 34.1) 1 Perl FAQ part 4 of 0..9: Data Manipulation [Periodic Posting]
34.3 ( 21.0/ 12.5/ 7.3) 12 Unix and ease of use (WAS: Who makes more ...)
30.0 ( 0.9/ 29.0/ 29.0) 1 Perl FAQ part 5 of 0..9: Files and Formats [Periodic Posting]
28.4 ( 0.9/ 27.4/ 27.4) 1 Perl FAQ part 8 of 0..9: System Interaction [Periodic Posting]
27.3 ( 5.5/ 21.8/ 19.8) 8 Parsing html tag attributes & values in Perl
26.7 ( 0.9/ 25.6/ 25.6) 1 Perl FAQ part 7 of 0..9: Perl Language Issues [Periodic Posting]
24.4 ( 8.1/ 15.3/ 11.4) 11 term 'regular expressions' considered undesirable
23.3 ( 2.0/ 21.3/ 3.3) 3 PERLDatabase broken!Need help!
23.0 ( 1.0/ 21.9/ 21.9) 1 Perl FAQ part 6 of 0..9: Regular Expressions [Periodic Posting]
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
35 comp.lang.c++
34 comp.databases
33 comp.os.ms-windows.advocacy
33 comp.unix.advocacy
33 comp.os.linux.advocacy
33 comp.lang.tcl
33 comp.object
33 comp.infosystems.www.advocacy
32 comp.sys.amiga.advocacy
32 comp.lang.basic.visual
Top 10 Crossposters
===================
Articles Address
-------- -------
42 Gabriel Kniznik <gkniznik@satlink.com>
39 mwolfe@shrike.depaul.edu
36 Bill Dugan <wkdugan@ix.netcom.com>
21 Randy Wright <rw26@acf2.nyu.edu>
21 Peter da Silva <peter@nmti.com>
21 moonman3@ix.netcom.com.z
21 fakename@nospam.com
21 Mike Griffin <mikeg@america.net>
21 Thomas Stuempfig <to3@pi-serv.physik.uni-stuttgart.de>
21 Joel Garry <joelga@rossinc.com>
------------------------------
Date: 22 Mar 1997 16:32:32 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: What's a good Perl book?
Message-Id: <5h11j0$29c@fridge-nf0.shore.net>
Joe Brenner (doom@kzsu.Stanford.EDU) wrote:
: If you're interested, my reaction to the first chapter was
: something like "Gee, this example he's working with is so
: artificial. Wouldn't it be better if he could show how to
: write something in Perl that's actually useful?"
Useful is a relative term. I think Perl sockets examples are "useful,"
while others may not. What would you rather have seen? :-)
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Sat, 22 Mar 1997 16:10:15 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: When is a perl program too big?
Message-Id: <5h0vbu$4de$1@news3.microserve.net>
1. When is a perl program too big?
I am used to breaking projects into a series of small programs rather
than one large program. There are multiple reasons for doing this on
all the systems I have worked - memory, program execution time,
programmer understanding and more.
The Perl executable appears to require a lot of resources which would
make me tend to build larger programs rather than a group of smaller
programs. What are your guidelines?
2. Perl control program or UNIX shell.
Based on what I read I would do the following to run a fairly complex
system:
break task into programs of size 50-400 lines
create a perl control program to exec the system:
example:
system(edit input data) check return
system(sort) check return
system(update main file) check return
system(sort)check return
system(more update)check return
system(sort)check return
system(report)check return
system(more reports)check return
What would you do? Why?
Email please heberts@microserve.net Thanks
------------------------------
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 160
*************************************
