[9991] in Perl-Users-Digest
Perl-Users Digest, Issue: 3584 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 29 20:03:42 1998
Date: Sat, 29 Aug 98 17:00:15 -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 Sat, 29 Aug 1998 Volume: 8 Number: 3584
Today's topics:
CGI Search Programmer Needed webmaster@cermak.com
Re: COBOL and Perl (Jonathan Stowe)
Re: comp.lang.perl.windows.misc (Jonathan Stowe)
Re: File Propagation (Jonathan Stowe)
Re: gd.pm (Jonathan Stowe)
Re: Imagine... a non-greedy world! (Craig Berry)
Re: Imagine... a non-greedy world! <jdf@pobox.com>
Re: Imagine... a non-greedy world! (Patrick Timmins)
Re: Imagine... a non-greedy world! <rootbeer@teleport.com>
Re: Perl Docs.. forget the original post (Author) (Jonathan Stowe)
Re: Perl documentation (Craig Berry)
Re: Please help - perl (Jonathan Stowe)
Re: regex help, again?? <rootbeer@teleport.com>
Sending mail with Perl 5 betat@my-dejanews.com
Sending mail with Perl 5 betat@my-dejanews.com
Re: Sending mail with Perl 5 (Alastair)
Re: sorting (Bob Trieger)
Re: Y2K Date Support (Jonathan Stowe)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 29 Aug 1998 14:45:20 GMT
From: webmaster@cermak.com
Subject: CGI Search Programmer Needed
Message-Id: <6s9460$g38$1@nnrp1.dejanews.com>
Hello, I'm the webmaster of a few web sites, including www.helponthe.net If
you'll take a moment to visit the site, you'll see that it offers free
technical support to anyone who might need it, and is becoming much more
popular than I had ever expected since recent articles (Money Magazine,
NetGuide, FamilyPC, and ZDtv). So, to get right to the point, I need a new
Search feature for the site. The one that exists right now is simply not
powerful enough for the 17,000 articles that are currently archived. If
anyone has any suggestions of possible existing engines that could be
modified, or - even better - if someone would like to volunteer their help in
exchange for some advertising on the site as well as proper credit on each
Search screen, please email me at webmaster@cermak.com
Thanks for any responses,
-Mike Cermak
Cermak Technologies
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 29 Aug 1998 15:18:13 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: COBOL and Perl
Message-Id: <35e7e4d5.7112677@news.btinternet.com>
On 27 Aug 1998 15:09:11 GMT, scott@softbase.com wrote :
>
>People who are used to the UNIX file system and all the OSes created
>after this file system became widely known just can't appreciate how
>bizarre the mainframe really is.
>
Oh yes I can : you should have heard the screams of pain coming from
the other side of the office when the ICL System 39 was hauled out and
replaced with a Sun Enterprise 400, and then trying to persuade these
poor souls that Perl really is superior to SCL eech...
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 29 Aug 1998 15:18:20 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: comp.lang.perl.windows.misc
Message-Id: <35e7f4e0.11219529@news.btinternet.com>
On Thu, 27 Aug 1998 14:08:46 GMT, Andrew M. Langmead wrote :
>
>Uri corrected the mistake in the CP/M derived from Unix portion, and I
>just wanted to mention another thing. Most of the Unix similarity that
>may be in MS-DOS (which then will lead to its appearance in the later
>operating systems) was added in MS-DOS and PS-DOS 2. (I think the
>first version of MS-DOS for sale. Only PS-DOS had a version 1) Things
>like the hierarchical file system, pipes, redirection, and what became
>the prefered I/O API (which look a lot like Unix's file descriptors
>and read/write calls)
I Seem to recall that this was when MS still had Xenix and DOS 2
introduced quite a few unicisms that were subsequently removed from
the documented interface (the APIs still exist to change the Switch
character from / to - for instance )
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 29 Aug 1998 15:18:26 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: File Propagation
Message-Id: <35e8136b.19038542@news.btinternet.com>
On Thu, 27 Aug 1998 16:28:22 -0600, Trent Tucker wrote :
>Howdy-
>
>Can someone send me some perl code for propagating a file down a
>directory tree?
>
>I have a simple script for creating a string and saving it so a
>file, but I want it to be saved not to a single file but
>to individual files in every
>directory below a particualr path.
>
If i get your meaning right then you will probably want to use
something like the File::Find module that comes with the Perl
distribution.
>can anyone send me the code to do that?
>
not sent but a small example nonetheless:
#!/develop/bin/perl
use File::Find;
find(\&wanted,".");
sub wanted
{
if ( -d $_ )
{
print $File::Find::name,"\n";
open(THEFILE,">" . $_ . "/_jfile") || die "blah - $!";
print THEFILE "contents of file";
close THEFILE;
}
}
For an explanation of what is going on here you might read the docs
for File::Find.
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 29 Aug 1998 15:18:22 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: gd.pm
Message-Id: <35e80091.14212393@news.btinternet.com>
On Thu, 27 Aug 1998 00:19:24 GMT, Dale Sutcliffe wrote :
>I am trying to use gd.pm.
>It does not seem to be working?
>How is it set up?
follow the instructions in the README file that came with
distribution. If you only have the file GD.pm then you will have to
get the complete distribution frm CPAN.
>Do I simply place the pm file into a specific directory or what?
This will not work with GD and other modules that have binary XS
component which need to be compiled. If you are on a Win32 platform
and you dont have a supported C compiler then you will need to get a
binary distribution.
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 29 Aug 1998 19:34:11 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Imagine... a non-greedy world!
Message-Id: <6s9l3j$lo3$3@marina.cinenet.net>
Mee (mee@mine.com) wrote:
: So far so good:
: Everyone has noted a typo in the contrived example
: but noone has understood the question.
Given that your example provided - or tried to provide - the only real
description of what you wanted, its inaccuracy kind of left us with
nothing to comment on.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| "Ripple in still water, when there is no pebble tossed,
nor wind to blow..."
------------------------------
Date: 29 Aug 1998 10:48:45 -0400
From: Jonathan Feinberg <jdf@pobox.com>
To: Mee <mee@mine.com>
Subject: Re: Imagine... a non-greedy world!
Message-Id: <m3g1efhmia.fsf@joshua.panix.com>
Mee <mee@mine.com> writes:
> Why in the world should /si*k/ match "something that bozos put on
> their ugly, bloated faces when they get drunk" rather than just
> simply "sink" is beyond me.
It doesn't. Why you think * should mean anything other than "0 or
more of the preceding expression", given that it means precisely that
in dozens of other regex packages, is beyond me. Are you unfamiliar
with the ? modifier, which tells * and + not to be greedy?
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Sat, 29 Aug 1998 14:44:35 GMT
From: ptimmins@netserv.unmc.edu (Patrick Timmins)
Subject: Re: Imagine... a non-greedy world!
Message-Id: <6s944j$fto$1@nnrp1.dejanews.com>
In article <35E7B28D.2207FF28@mine.com>,
Mee <mee@mine.com> wrote:
> To: All priests of Perl black maguc
>
> My favorite beef with Perl (besides it being the ugliest
> language man has ever devised) is its implementation of
> Regular Expresssions (regexp).
Wheeeeere's the Beef!? You have no beef ... only problems.
> Day after day, I find myself fighting the regexp greediness
> tooth and nail to arrive at the desired result.
Why do you fight it? Use it when it's useful, and don't use
it when it's not. Is adding a '?' into the rest of your regex
that much of a battle for you?
> Why in the world should /si*k/ match "something that bozos
> put on their ugly, bloated faces when they get drunk"
> rather than just simply "sink" is beyond me.
I can't think of a good reason why it should match either.
> Now, can anyone imagine a world with Perl in harmony
> with nature? Would it take away the magic, would it make
> it too plain?
Is that from a John Lennon song?
> Or am I simply overlooking some hidden, but obvious too
> the enlightened, logical reason for greediness?
Yes,
> Mee
you are.
There is a book called "Mastering Regular Expression", by Jeffrey Friedl
(O'Reilly and Assoc., Pub). If at all possible, you should buy this book.
It will clear everything up for you.
Patrick Timmins
U. Nebraska Medical Center
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 29 Aug 1998 19:59:39 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Imagine... a non-greedy world!
Message-Id: <Pine.GSO.4.02A.9808291257050.15614-100000@user2.teleport.com>
You said that nobody had understood the original question, so let me go
back to the original message and take a crack at it. Here are the three
questions I found, and my answers.
On Sat, 29 Aug 1998, Mee wrote:
> Now, can anyone imagine a world with Perl in harmony
> with nature?
Yes. In fact, you're not asking much of the imagination.
> Would it take away the magic, would it make it too plain?
I don't think the world or Perl would be any less magical.
> Or am I simply overlooking some hidden, but obvious too
> the enlightened, logical reason for greediness?
Yes.
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 29 Aug 1998 15:18:16 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Perl Docs.. forget the original post (Author)
Message-Id: <35e7ef68.9819271@news.btinternet.com>
On Sat, 29 Aug 1998 05:54:41 +0900, Norman UNsoliciteds wrote :
>At no point does it explain any the information about how you should
>behave in these groups - it tells you how to get here and seems to suggest
>you can post questions - but it doesn't have all the diatribe that usually
>follows newbies posting.- this should be included (IMO) However I suggest
>that this be in a document of the READ ME FIRST kind
>
It is assumed of course that a new Usenet user had first read the
excellent advice dispensed through news.announce.newusers - it would
be unnecessary for the Perl documentation to duplicate this
information. Of course a little survey as to how many posters *had*
read that group might prove illuminating.
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 29 Aug 1998 19:27:00 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Perl documentation
Message-Id: <6s9km4$lo3$1@marina.cinenet.net>
Bart Lateur (bart.mediamind@tornado.be) wrote:
: Craig Berry wrote:
:
: >So you don't know the difference between statements and functions?
:
: Ouch. Perl doesn't MAKE much distinction between expressions and
: statements, or between functions and procedures. For example:
Well, no, actually there's a big difference; it's just that an expression
(evaluated for its side effects, typically) is the simplest kind of
statement. My point was that foreach is a more complex kind of statement,
not a kind of function (and thus a building block of an expression).
: I think a simple TOC, with ALL Perl keywords/operators, and the POD
: file(s) where they are documented, would help less experienced greppers.
That much is probably true. Of course, the index of the Camel book is one
such (though admittedly you have to pay for it).
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| "Ripple in still water, when there is no pebble tossed,
nor wind to blow..."
------------------------------
Date: Sat, 29 Aug 1998 15:18:24 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Please help - perl
Message-Id: <35e80e6f.17763074@news.btinternet.com>
On Thu, 27 Aug 1998 17:59:09 GMT, Hovercraft@altavista.net wrote :
>Hi,
> Recently I setup a web site as a school project. It ended up becoming
>abit more than just a school project. Last night I purchased a domain name and
>virtual server from money I borrowed from my parents.
>
It'll end in tears you know - I borrowed money from my parents to buy
a bass guitar and amplifier and it resulted in 20 years of substance
abuse ;-}
>Since I started I have learned a lot of HTML but this is where my problems
>lies. I am looking for somebody to help me configure perl scripts. I really
>need somebody help and would appreciate if somebody can help me.
>
I think the first and most important step is to get your shoes on (not
forgetting clothes first of course) and go down to the nearest
bookshop and purchase "Learning Perl" by Randal Schwartz from O'Reilly
associates (ISBN 1-56592-042-2) and then go back home switch off your
computer and read the book right through then switch your computer
back on and start reading again this time doing the examples.
You will also the documentation that comes with perl particularly
useful - especially the FAQ which covers nearly every question a
learning perl programmer might ask and then some.
Also if you lurk around in this newsgroup for a while you will see
answered most other questions that arent answered by perlfaq and/or
references to sources of further information.
Hope that helps
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Sat, 29 Aug 1998 18:40:02 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: regex help, again??
Message-Id: <Pine.GSO.4.02A.9808291136140.15614-100000@user2.teleport.com>
On Sat, 29 Aug 1998, josh skidmore wrote:
> Subject: regex help, again??
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> ok...i am tring to post the business news from wired on my site...i am using
> LWP (simple) to do it, but how exactly do I get a regex to get the line
> labeled **LINE**?? There is nothing similar?
>
> <font face="Arial, Helvetica, sans-serif" size=3>
> <a href="/news/news/business/story/14705.html"><b>Intuit: Cost-Cutting
> Pays Off</b></a></font>
> <br>
> <font color=#ff0000 face="Verdana, Arial, Geneva, sans-serif"
> size=1><b></b><!br>Thursday</font>
> <font face="Verdana, Arial, Geneva, sans-serif" size=2>
> **LINE** The maker of personal finance software says its close eye on
> expenses helps account for its better-than-forecast fourth-quarter earnings.
> </font>
I presume that you don't mean that the line you want begins with the
literal string '**LINE**'. Perhaps you want the FAQ's entry about
stripping the HTML tags from a document. If that's not it, though, the
question becomes, "In what way is the line you want different than the
others?".
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 29 Aug 1998 14:41:39 GMT
From: betat@my-dejanews.com
Subject: Sending mail with Perl 5
Message-Id: <6s93v3$ft0$1@nnrp1.dejanews.com>
I am trying to implement a script in Perl5 to send directly a mail to a
mailing list server for subscription / unsubscription management. The
script is supposed to be run when the user cliks on a button from a
web page.
Quite easy and common, no ?! That's what I thought at the beginning.
I have implemented this script from the example given in the document
"Perl 5 by example" by David Medinets and I don't know why but the
mailing list server and all the users I send mail to for testing never
get the mail.
The script seems to be OK and when I trace the exchanges with the
mail server everything looks OK as well.
Has anyone ever had the same kind of problem ?
Note: I use Xitami as web server for my tests.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 29 Aug 1998 14:41:40 GMT
From: betat@my-dejanews.com
Subject: Sending mail with Perl 5
Message-Id: <6s93v5$ft1$1@nnrp1.dejanews.com>
I am trying to implement a script in Perl5 to send directly a mail to a
mailing list server for subscription / unsubscription management. The
script is supposed to be run when the user cliks on a button from a
web page.
Quite easy and common, no ?! That's what I thought at the beginning.
I have implemented this script from the example given in the document
"Perl 5 by example" by David Medinets and I don't know why but the
mailing list server and all the users I send mail to for testing never
get the mail.
The script seems to be OK and when I trace the exchanges with the
mail server everything looks OK as well.
Has anyone ever had the same kind of problem ?
Note: I use Xitami as web server for my tests.
--
------------------------------------------------------------------------
Cyril BETAT - betat@crisscross.com
Park Square A104 / Takaishigami 14-7 / Ichikawa shi /
Chibaken 272 / Japan
------------------------------------------------------------------------
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 29 Aug 1998 14:56:58 GMT
From: alastair@calliope.demon.co.uk (Alastair)
Subject: Re: Sending mail with Perl 5
Message-Id: <slrn6ug9bv.54.alastair@calliope.demon.co.uk>
betat@my-dejanews.com <betat@my-dejanews.com> wrote:
>I am trying to implement a script in Perl5 to send directly a mail to a
>mailing list server for subscription / unsubscription management. The
>script is supposed to be run when the user cliks on a button from a
>web page.
I'd use one of the mail modules available on CPAN.
--
Alastair
work : alastair@psoft.co.uk
home : alastair@calliope.demon.co.uk
------------------------------
Date: Sat, 29 Aug 1998 17:41:32 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: sorting
Message-Id: <6s9emj$7h5$1@strato.ultra.net>
[ posted to usenet and courtesy e-mail sent to Alan Melton ]
Alan Melton <arm@home.net> wrote:
-> Would like to sort report on $desc
-> and get subtotals after a break on each sort.
Check out perlfaq4 - How do I sort an array by (anything)?
Bob Trieger
sowmaster@juicepigs.com
------------------------------
Date: Sat, 29 Aug 1998 15:18:15 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Y2K Date Support
Message-Id: <35e7e9a2.8341569@news.btinternet.com>
On Fri, 28 Aug 1998 21:25:45 +0900, Norman UNsoliciteds wrote :
>In article <6s59lr$1kf$1@marina.cinenet.net>, cberry@cinenet.net (Craig
>Berry) wrote:
>> As a result of sloppy math and historical research by Dennis
>> the Little, our calendar has no year zero,
>
>so what happened 1,998 years ago? why are we counting from such a
>relatively recent date and not from the dawn of the eistence of the earth?
I, for one, would get bored writing 24/07/4567128398 (for instance) on
cheques.
/J\
--
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3584
**************************************
