[7436] in Perl-Users-Digest
Perl-Users Digest, Issue: 1061 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Sep 23 04:17:19 1997
Date: Tue, 23 Sep 97 01:00:43 -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 Tue, 23 Sep 1997 Volume: 8 Number: 1061
Today's topics:
Re: "here document" method of print erroring (Jeremy D. Zawodny)
Re: ^Z and file input problem (Andrew M. Langmead)
Re: CGI and Mail on NT (Jeroen van Gorkum)
Exponential Calculation Problems <rodm@studiopointe.com>
file flush <webmaster@www.aquanet.gr>
file flush <webmaster@www.aquanet.gr>
Re: file flush (I R A Aggie)
Re: file flush (Jeremy D. Zawodny)
Foolish Question About Saving Gifs annerose@geocities.com
Re: Foolish Question About Saving Gifs (Website Construction Company)
RE: Forms: Variable Number of Input Variables (Becky Grasser)
Re: Forms:Variable number of input values (Becky Grasser)
Re: Forms:Variable number of input values (Jeremy D. Zawodny)
Re: Help with file I/O problems. (Eric)
How to set variables from another file (T. Wheeler)
long versus short filenames in win32 <david_ransier@intercept.com>
Re: Memory leak? (Matthew Cravit)
Need help with pesky warning... <david.s.patterson@boeing.com>
pattern matching <webmaster@www.aquanet.gr>
Re: pattern matching <jkv@a.sol.no>
Re: pattern matching (Jeremy D. Zawodny)
Re: Problem with files!!! Please help me! (Tad McClellan)
Re: Problems with variables as subs? (Steve Lamb)
Re: Problems with variables as subs? <ajohnson@gpu.srv.ualberta.ca>
Re: Regular Expressions (Tad McClellan)
Re: Regular Expressions (Jeremy D. Zawodny)
running a macro <gland@ccs.neu.edu>
Re: Script to Capitalize HTML Tags (Jeroen van Gorkum)
Re: simple script (Andrew M. Langmead)
Re: Statistics for comp.lang.perl.misc <cphillip@kerr.phys.utas.edu.au>
Re: Statistics for comp.lang.perl.misc (brian d foy)
Re: Statistics for comp.lang.perl.misc (Michael Fuhr)
Re: Statistics for comp.lang.perl.misc (Tad McClellan)
Re: symbolic dereferencing of my() variables -- can it (brian d foy)
Terminating Win32 perl programs <bigred@pmpro.com>
Re: what's wrong in this function? (Jeremy D. Zawodny)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 23 Sep 1997 01:14:26 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: "here document" method of print erroring
Message-Id: <342e1764.1031563299@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Sat, 20 Sep 1997 22:15:15 -0500, Ben Scott
<jds02@ix.netcom.comNoSpam> wrote:
>I am using the "here document" style of the print command and it is not
>working correctly for me. please lemme know if I'm doing everything
>right or am completely off in some way. code and error follow:
>
>code____________________________
> print <<END_OF_TEXT;
> a bunch of text
> with quotes "and other stuff"
>END_OF_TEXT
>
>error___________________________
>Can't find string terminator "END_OF_TEXT" anywhere before EOF at
>mycgi.cgi line 68.
The most common cause of this problem is that you've got some
"invisible" text at the end of "END_OF_TEXT". That's typically caused
by creating the script on a one computer (using editors which place
control characters at the end of lines) and transferring them in
BINARY mode via FTP to the machine on which you're running Perl.
The solution to that problem is to be sure and transfer in ASCII mode.
On the other hand, if that's not what's happening, I'd suggest making
sure there aren't any extra spaces at the end of "END_OF_TEXT". Some
editors make such spaces less visible than others.
Good Luck,
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"That's an example of how Perl can bring school yard cruelty to new heights."
-- Jon Orwant at the 1st Annual Perl Conference
------------------------------
Date: Tue, 23 Sep 1997 01:05:10 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: ^Z and file input problem
Message-Id: <EGxsCM.pq@world.std.com>
tfletche@pcocd2.intel.com (Terry Michael Fletcher - PCD ~) writes:
> also, does binmode make a difference? it
>shouldnt since i dont think you would get chars above ASCII 127.
On NT, binmode() doesn't change the input or output operators handling
of the high bit. It performs the following functions:
prevents the removal of "\r" characters in the input stream.
prepends a "\r" to the output stream any place it finds a "\n"
prevents the input operators from returning EOF when a control-Z is
encountered.
--
Andrew Langmead
------------------------------
Date: Tue, 23 Sep 1997 00:53:02 GMT
From: jvgorkum@dds.nl (Jeroen van Gorkum)
Subject: Re: CGI and Mail on NT
Message-Id: <342708e9.11496991@news.a1.nl>
>From the Perl for Win32 FAQ
(http://www.endcontsw.com/people/evangelo/Perl_for_Win32_FAQ.html):
[snip snip] One popular one is BLAT, which is available in the Windows
NT Resource Kit, and on the Web at this URL:
http://gepasi.dbs.aber.ac.uk/softw/Blat.html
Note that the command line syntax for BLAT is different from of
"sendmail".
Microsoft has a port of sendmail available on their FTP site at:
ftp://ftp.microsoft.com/developr/drg/unix-to-windows/ports/sendmail/
A commercial sendmail product is available from MetaInfo, Inc., at:
http://www.metainfo.com/
There is an evaluation version available for download.
Another commercial mail product is wrmail, part of the slmail product
from Seattle Labs. A free version is available at
http://www.seattlelab.com/
You like me, don't you?
--JvG
On Tue, 16 Sep 1997 20:06:52 -0700, Jan Krynicky
<Jan.Krynicky@st.mff.cuni.cz> wrote:
>T. LaWall wrote:
>> Does anyone know out there of a way to interface to the Windows NT
>> Mail system through Perl? I need a way for an NT Perl CGI script
>> to e-mail results to some individuals with Internet email addresses.
>> Pointers to sites with info on this, or some examples would help.
>> Please email me when you post.
>>
>> Thanks in advance,
>> Todd
>
>You may use some commandline based program to send the mails
>(wSendmail.exe, Blat.exe, etc. don't remember links, sorry)
> system("blat.exe params < tempfile.txt");
>or a module sending the mails through socket()s.
>Say SendMailEx.pm or Mail::Sender.pm from
>http://www.chipnet.cz/depot/perl.htm
>
>HTH, Jenda
------------------------------
Date: Mon, 22 Sep 1997 21:51:25 -0500
From: Rod Moore <rodm@studiopointe.com>
Subject: Exponential Calculation Problems
Message-Id: <34272EAD.67FA@studiopointe.com>
I am trying to figure out how to calculate a number with an exponent.
For example, in BASIC, printing 2^2 gives you 4, 5^2 = 25. This syntax
does not work with PERL 5, and I have looked at the EXP function but I
have not figured out proper syntax to get the results I want.
HELP! (I know someone will have the answer to this easy question)
Thanks,
--
+--------------------------------------------------------------------+
| Rod W. Moore, Jr. * StudioPointe Incorporated |
| Director of Graphic Design * 9100 Watson Rd. Suite 202 |
| * Crestwood, MO 63126 |
| * vox (314)849-6060 |
| * fax (314)849-6380 |
| mailto:rodm@studiopointe.com * http://www.studiopointe.com |
| * |
+--------------------------------------------------------------------+
------------------------------
Date: Tue, 23 Sep 1997 02:00:23 +0300
From: "Lefteris Xanthoudakis" <webmaster@www.aquanet.gr>
Subject: file flush
Message-Id: <874969396.644859@pluto.hol.gr>
Hi all,
I'm new to Perl and writting a little script which creates a log. I
opened a filehandle to a log file like ">>script.log" and everything works
fine. The script though doesn't update the file line by line before it
finishes or the buffer runs out so "tail -f script.log" doesn't work well.
Is there a file-flush function in Perl.
Thank's in advance, Lefteris
------------------------------
Date: Tue, 23 Sep 1997 02:00:23 +0300
From: "Lefteris Xanthoudakis" <webmaster@www.aquanet.gr>
Subject: file flush
Message-Id: <874969349.634624@pluto.hol.gr>
Hi all,
I'm new to Perl and writting a little script which creates a log. I
opened a filehandle to a log file like ">>script.log" and everything works
fine. The script though doesn't update the file line by line before it
finishes or the buffer runs out so "tail -f script.log" doesn't work well.
Is there a file-flush function in Perl.
Thank's in advance, Lefteris
------------------------------
Date: Mon, 22 Sep 1997 20:10:10 -0400
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: file flush
Message-Id: <-2209972010100001@aggie.coaps.fsu.edu>
In article <874969396.644859@pluto.hol.gr>, "Lefteris Xanthoudakis"
<webmaster@www.aquanet.gr> wrote:
+ Is there a file-flush function in Perl.
Set $| to a non-zero value. grep the man page for "autoflush" for
further information.
James
--
Consulting Minister for Consultants, DNRC
Support the anti-Spam amendment <url:http://www.cauce.org/>
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Tue, 23 Sep 1997 01:00:35 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: file flush
Message-Id: <342b142a.1030737291@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Tue, 23 Sep 1997 02:00:23 +0300, "Lefteris Xanthoudakis"
<webmaster@www.aquanet.gr> wrote:
> I'm new to Perl and writting a little script which creates a log. I
>opened a filehandle to a log file like ">>script.log" and everything works
>fine. The script though doesn't update the file line by line before it
>finishes or the buffer runs out so "tail -f script.log" doesn't work well.
>Is there a file-flush function in Perl.
The magical "$|" will save the day, I think.
By default Perl is buffering output to the file. Setting $| will turn
that behavior off:
open(LOG, ">>/tmp/log.txt") or die "$!";
select(LOG);
$|=1;
print "You should see this right away.\n";
select(STDOUT);
sleep 20;
close(LOG);
Good Luck,
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"These constraints effectively ruled out the obvious choices of using
plain fingers (yogurt is not a finger food at work), and of constructing
a make-shift spoon from paper clips, scraps of paper, and scotch tape."
-- Justin Dolske (dolske@cis.ohio-state.edu> in alt.hackers
------------------------------
Date: Mon, 22 Sep 1997 19:42:18 -0600
From: annerose@geocities.com
Subject: Foolish Question About Saving Gifs
Message-Id: <874973958.31468@dejanews.com>
I'm trying to help out a friend by converting a cgi I wrote to
something he can run offline, as he's moving to a country with
few ISPs. I know I could just leave the cgi as it is, and he
could run it from a browser, but I'd like to give him something
more elegant.
The problem I'm having is saving gif files created by MacPerl and
gd.pm (as he's going to be running perl with Win95 and uses
different graphics software than I do, I do need to save them as gifs)
So far, everything I've tried has resulted in a screenful of misc.
characters accompanied by endless repetitions of the alert
sound on my Mac.
If anyone has a few lines of script that will get around this
problem, would you be kind enough to email them to me?
Thanks,
Anne
-------------------------------------------------------------
A rose with many thorns
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: Tue, 23 Sep 1997 01:18:52 GMT
From: websites@erols.com (Website Construction Company)
Subject: Re: Foolish Question About Saving Gifs
Message-Id: <34271854.4253870@news.erols.com>
Of course I don't know exactly what is wrong, but what I learned when
I tried to take some scripts off my ISP's unix box and place on a Mac
is that they won't often work. Mac has a different directory
structure, and the same programs won't work. For instance, on a PC a
file might be c:\www\script.pl, and on a mac it is :www:script.pl.
Might this be part of the problem?
Irwin
On Mon, 22 Sep 1997 19:42:18 -0600, annerose@geocities.com wrote:
>I'm trying to help out a friend by converting a cgi I wrote to
>something he can run offline, as he's moving to a country with
>few ISPs. I know I could just leave the cgi as it is, and he
>could run it from a browser, but I'd like to give him something
>more elegant.
>
>The problem I'm having is saving gif files created by MacPerl and
>gd.pm (as he's going to be running perl with Win95 and uses
>different graphics software than I do, I do need to save them as gifs)
>
>So far, everything I've tried has resulted in a screenful of misc.
>characters accompanied by endless repetitions of the alert
>sound on my Mac.
>
>If anyone has a few lines of script that will get around this
>problem, would you be kind enough to email them to me?
>
>Thanks,
>Anne
>-------------------------------------------------------------
> A rose with many thorns
>
>-------------------==== Posted via Deja News ====-----------------------
> http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: Mon, 22 Sep 97 15:14:35 GMT
From: rgrasser@acm.org (Becky Grasser)
Subject: RE: Forms: Variable Number of Input Variables
Message-Id: <6061v2$7dk@slider.bme.ri.ccf.org>
In article <Pine.GSO.3.96.970917163619.5344J-100000@julie.teleport.com>, Tom
Phoenix <rootbeer@teleport.com> wrote:
>On Mon, 15 Sep 1997 NOSPAMrgrasser@acm.org wrote:
>
>> I am building a form application that takes values from a form
>> and builds a file (i.e. a sql script). The first 15 or so values
>> are required - that is - they must exist. After that, they do not
>> have to exist. However, once one value is null, all the rest
>> will be null. I would like to be able to examine the incoming
>> values, put the existing ones in a file, and exit on the
>> first null value.
>>
>> I suspect I am missing something obvious - can anyone
>> point me in the right direction?
>
> Yes: You have to tell us where you're stuck! I can't see any problem in
> what you state you'd like to do. Try again. :-)
Well - I posted an answer once, but I think my news server ate it ;-(
I figured what I want to do is straight forward.. My problem is I'm not
all that confident in Perl programming. This is my first attempt at
doing this on my own - previously, I spent time modifying others'
work to make it work on my system. So, I'm stuck at the beginning ....
Can someone point me at a sample or a book chapter or something
so I can see someone else's code? (Or post something here - but I
don't want to impose too much..) All my information comes thru a
form application (<FORM></FORM>) using the POST method.
It automagically appears in a perl script where I parse everything out
and write things to a series of scripts. Any caveats, warnings, or
kludges you know of would also be appreciated.
thanks as always for your help.
becky
------------------------------
Date: Mon, 22 Sep 97 14:53:10 GMT
From: rgrasser@acm.org (Becky Grasser)
Subject: Re: Forms:Variable number of input values
Message-Id: <6060mu$7dk@slider.bme.ri.ccf.org>
In article <Pine.GSO.3.96.970917163619.5344J-100000@julie.teleport.com>, Tom Phoenix <rootbeer@teleport.com> wrote:
>On Mon, 15 Sep 1997 NOSPAMrgrasser@acm.org wrote:
>
>> I am building a form application that takes values from a form
>> and builds a file (i.e. a sql script). The first 15 or so values
>> are required - that is - they must exist. After that, they do not
>> have to exist. However, once one value is null, all the rest
>> will be null. I would like to be able to examine the incoming
>> values, put the existing ones in a file, and exit on the
>> first null value.
>>
>> I suspect I am missing something obvious - can anyone
>> point me in the right direction?
>
>Yes: You have to tell us where you're stuck! I can't see any problem in
>what you state you'd like to do. Try again. :-)
Well - I posted an answer once, but I think my news server ate it ;-(
I figured what I want to do is straight forward.. My problem is I'm not
all that confident in Perl programming. This is my first attempt at
doing this on my own - previously, I spent time modifying others'
work to make it work on my system. So, I'm stuck at the beginning ....
Can someone point me at a sample or a book chapter or something
so I can see someone else's code? (Or post something here - but I
don't want to impose too much..) All my information comes thru a
form application (<FORM></FORM>) using the POST method.
It automagically appears in a perl script where I parse everything out
and write things to a series of scripts. Any caveats, warnings, or
kludges you know of would also be appreciated.
thanks as always for your help.
becky
------------------------------
Date: Tue, 23 Sep 1997 00:51:43 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: Forms:Variable number of input values
Message-Id: <34291186.1030061950@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Mon, 22 Sep 97 14:53:10 GMT, rgrasser@acm.org (Becky Grasser)
wrote:
>In article <Pine.GSO.3.96.970917163619.5344J-100000@julie.teleport.com>, Tom Phoenix <rootbeer@teleport.com> wrote:
>>On Mon, 15 Sep 1997 NOSPAMrgrasser@acm.org wrote:
>>
>>> I am building a form application that takes values from a form
>>> and builds a file (i.e. a sql script). The first 15 or so values
>>> are required - that is - they must exist. After that, they do not
>>> have to exist. However, once one value is null, all the rest
>>> will be null. I would like to be able to examine the incoming
>>> values, put the existing ones in a file, and exit on the
>>> first null value.
>>>
>>> I suspect I am missing something obvious - can anyone
>>> point me in the right direction?
>>
>>Yes: You have to tell us where you're stuck! I can't see any problem in
>>what you state you'd like to do. Try again. :-)
>
>Well - I posted an answer once, but I think my news server ate it ;-(
>
>I figured what I want to do is straight forward.. My problem is I'm not
>all that confident in Perl programming. This is my first attempt at
>doing this on my own - previously, I spent time modifying others'
>work to make it work on my system. So, I'm stuck at the beginning ....
>
>Can someone point me at a sample or a book chapter or something
>so I can see someone else's code? (Or post something here - but I
>don't want to impose too much..) All my information comes thru a
>form application (<FORM></FORM>) using the POST method.
>It automagically appears in a perl script where I parse everything out
>and write things to a series of scripts. Any caveats, warnings, or
>kludges you know of would also be appreciated.
In that case, I'll do a bit of both.
For starters, you asked about books. For beginners, I'll suggest (as
most do) Learning Perl, 2nd edition. It's published by O'Reilly and
Associates (http://www.ora.com/) and is available in most book stores.
If not, you can get it from O'Reilly's web site, or from Amazon.com as
well.
When developing CGI scripts in Perl which retrieve data from an HTML
form, you'll want to make use of the wonderful CGI.pm module. The
current version and documentation (with good examples) is available
from:
http://www-genome.wi.mit.edu/ftp/pub/software/WWW/cgi_docs.html
Other than that, all I can really say is start with simple code--just
a few lines, and see what it does. Play with the examples and start
changing things to see what sort of effects they have. Sooner or later
you'll feel more confident in using CGI.pm's many functions for
retrieving data from web pages and creating new ones.
Good Luck,
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"These constraints effectively ruled out the obvious choices of using
plain fingers (yogurt is not a finger food at work), and of constructing
a make-shift spoon from paper clips, scraps of paper, and scotch tape."
-- Justin Dolske (dolske@cis.ohio-state.edu> in alt.hackers
------------------------------
Date: 23 Sep 1997 02:08:04 GMT
From: pojo@gte.net (Eric)
Subject: Re: Help with file I/O problems.
Message-Id: <6078a4$enc$1@gte1.gte.net>
On Tue, 16 Sep 1997 20:33:54 GMT, "Icepick" <icepick@NOSPAMpclink.com>
wrote:
>Okay, quick and dirty background. I'm new to perl, and working on
>various projects just to learn. More or less the jump in first then
>learn to swim method of self teaching.
>
>I'm currently working on a program that reads in a file called "text"
>and stores it in an @ array, one character per element, then XOR's
>each character with a value, then writes it all out to another
>file "output" It's the begining of a simple crypto script I'm
>messing with.
>
>My problem is that the output file is longer than the input file, and
>I can't figure it out. Also, when the output file is renamed to "text"
>and run through the script again, it should yield back the orginal
>"text" file. Alas, it doesn't. It does, however, work on the first
>portion of the file. Strange.
>
>Here's the relevant portions of the script (just cut and paste, should
>work for you) and the "text" file. Any suggestions?
>
>----------begin script-------
>
>#/usr/bin/perl -w
># get the data
>
>print "Getting the text from \"text\"\n";
>
>open (INP, "text") || die "can't open \"text\""; # open the file (nicely)
>
>$i=0;
>
>while (defined ($p[$i]=<INP>)) {
> $i++;
> }
>
>$lines=$i; # number of lines of data
>$len=0;
>
>for ($i=0;$i<=$lines;$i++) {
> for ($j=0;$j<=length($p[$i]);$j++) {
> $plain[$len]=ord(substr($p[$i],$j,1)); # convert to ascii
^^^
The 'ord' is one problem. This assigns $plain[] to being "65" for an
"A" character rather than just "A". Try removing it. I say this
because your XOR operator (^) is a BITWISE operator. BUT, you need to
convert $plain[] to a number instead of a string before doing the XOR
Also, you would want to XOR a byte with another byte, and not a long
number ($jj)? Try (after removing the ord() above):
$cypher[$jj] = (ord($plain[$jj]) ^ (($jj)%256));
Thus ensuring you use the lower 8 bits with a numeric quantity rather
than a string. There's also a way to force a string into numeric
context, but I cannot recall it right now. Check the FAQ.
> $len++;
> }
>}
>
>close (INP) || die "can't close \"text\""; # and close it (nicely)
>
>print "$lines lines $len chars\n";
>
># do the encryption
>
>print "Encrypting...\n";
>
>$jj=0;
>
>while ($jj<$len) { # while the number of bytes done is <=
> # the length of the plaintext
>
>$cipher[$jj]=$plain[$jj]^$jj ;
>$jj++;
>}
>
># all done, now write it to output
>
>print "Outputing to \"output\"\n";
>
>print $len;
>
>open (OUTP, ">output") || die "can't open \"output\"";
>
>for ($i=0;$i<=$len;$i++) {
> print OUTP chr($cipher[$i]);
>}
>
>close (OUTP) || die "can't close \"output\"";
>
>----------- end script -----------
>
>
>---------- begin test "text" file ---------
>
>another
> line in
> the works this is going to be
> a really really really really long line
> with no cairage s returns or line breaks or
> line feeds or any of
>
>1234567890 !@#$%%^^&&*(())
>
> that other silly nonsense
>that messes things up.
>
>----------------- end "text" file --------------
>
>
>
>--
>no more no less no fear no need no height no depth too great godspeed
>Want $1000?? Help break RC5! http://rc5.distributed.net/
>
------------------------------
Date: Tue, 23 Sep 1997 00:44:16 GMT
From: twheeler@m-net.arbornet.org (T. Wheeler)
Subject: How to set variables from another file
Message-Id: <34270daf.4000587@news.stlnet.com>
I can't seem to find this in a book, nor have I been able to figure it
out (yet).
I want to create a script that will basically do a find and replace
across a directory, replacing certain keywords with the value of a
scalar variable set in a master file. It will be used to allow
non-technical people create html pages through templates.
For example, let's say I have the 'master file' called master.tpl,
which sets the following:
[TOP] = "<HTML>\n
<HEAD>\n
<TITLE>Test page</TITLE>\n
</HEAD>\n
<BODY>\n";
[BOTTOM]="Created on $date\n
<HR>\n
</BODY>\n
etc......
And then someone could write a document like:
[TOP]
Here is my document. Blah blah blah...
[BOTTOM]
Then I could run a simple script that looks up the values of [TOP] and
[BOTTOM] in the master file and replace them as needed, capturing
STDOUT to a file.
Any ideas? Or maybe you could tell me an even better way of doing
this. I do see the problem of tags like <P> and the like being a pain
to include, but I want to be able to retain control over the overall
look of the site without resorting to something like FrontPage.
I hope it does not matter, but I do most of this work in Win95/NT,
although I do use Linux sometimes.
Thanks!
Tom
------------------------------
Date: 23 Sep 1997 01:15:35 GMT
From: "David Ransier" <david_ransier@intercept.com>
Subject: long versus short filenames in win32
Message-Id: <01bcc7bd$f375eef0$714b62c7@itibit>
I'm writing a Perl program that has to format command lines to be passed to
another program. The other program will not tolerate " "spaces in the
command string. Yet, the function I have to use to get the pathname to be
used in the command string returns a long pathname, which may include
spaces.
For example, a command function I have to call could be the pathname:
C:\Program Files\FlowXpert\bin\wxDialogs
The DOS pathname (short name) is probably:
C:\progra~1\flowxp~1\bin\wxDial~1
Is there a Win32 module function call, or some other Perl (Win API) call I
can use to get long versus short pathnames.
Ideally, I'd like to pass a long pathname as an argument and return the
short pathname.
A sort of related question, is there a C(++) Win API functions to get long
and short file names. I figure there must be because some install programs
change the long name in my file browser window to the equivalent short
name.
Please bear with me a little on this last question. I'm a mediocre C hack
and don't have the Win API manuals. But if I can answer the question, I
might be able to get the product group to change the function call I have
to use to get the original pathname.
If this seems a little confusing, maybe this example of how I'm getting
around the most common case of the problem will help:
$PATHNAME = $ENV{PROG_HOME}; # get the current variable value
$PATHNAME =~ s/program files/progra~1/i; # change "Program Files" into
"progra~1"
$wxDialogs = "$PATHNAME/bin/wxDialogs"; # build final pathname
Someone might look at the example above and see that the obvious solution
is to set the PROG_HOME environment variable to a short name in the first
place. The problem is this environment variable is over written at startup
time and I have no control over it.
Thanks,
David R
------------------------------------------------------------------------
_/_/_/ _/_/_/_/_/ _/_/_/ David M. Ransier
_/ _/ _/ Senior Consultant
_/ _/ _/ Intercept Technology Inc.
_/ _/ _/ David_Ransier@Intercept.com
_/ _/ _/ 503-692-0111 www.intercept.com
_/_/_/ _/ _/_/_/ 503-691-9535 (fax)
404-352-0111 (Corp Headquarters)
------------------------------
Date: 22 Sep 1997 16:19:11 -0700
From: mcravit@best.com (Matthew Cravit)
Subject: Re: Memory leak?
Message-Id: <606udf$394$1@shell3.ba.best.com>
In article <3426F2B4.7ABA@nospam.inconnect.com>,
Steve Wolfe <NerveGas@nospam.inconnect.com> wrote:
>Jason Gloudon wrote:
>
>> Also to the original poster there is no such group as comp.lang.perl
>> anymore.
>
> I just read 13 messages in it today - your news feed must not carry
>it. Talk to your admin, and they can probably add it for you, if the
Jason's statement was correct. When the comp.lang.perl newsgroup was split,
yielding comp.lang.perl.announce, comp.lang.perl.misc, comp.lang.perl.tk and
comp.lang.perl.modules, a decision was made to stop using comp.lang.perl, and
to let the new hierarchy replace the old one. Unfortunately, some news admins
never rmgroup'd the old group, so some people still post there.
If your ISP still carries comp.lang.perl, you should ask your news admin
to rmgroup it so it will finally go away, and you should be using the
new hierarchy. (The split happened some time ago, so it's not really "new",
but anyway...)
/MC
--
Matthew Cravit, N9VWG | Experience is what allows you to
E-mail: mcravit@best.com (home) | recognize a mistake the second
mcravit@taos.com (work) | time you make it.
------------------------------
Date: Tue, 23 Sep 1997 00:34:35 GMT
From: "David S. Patterson" <david.s.patterson@boeing.com>
Subject: Need help with pesky warning...
Message-Id: <34270E9A.41C6@boeing.com>
Howdy,
I am trying to figure out how to avoid getting run-time
warnings when executing the following program:
#!/usr/local/bin/perl_5.003 -w
open (FP1, "mydata.txt");
while (<FP1>)
{
chop;
m/^(\w+ +\w+) +(\w{10})(\w{10})?(\w{10})?/;
print "[$1] [$2] [$3] [$4]\n";
}
Here is mydata.txt:
7X7AA 286T0018001 0000200010
7X7AA 286T0018002 0000200010
7X7AA 286T0020001 000360003900041000460005099999
7X7AA 286T0020101 00001000250005000488
7X7AA 286T0020102 00001000250005000488
7X7AA 286T0033103 000010003200034000350005100120
The problem is that when this program is run with
the -w switch, I get a bunch of "Use of uninitialized
value at ..." warnings whenever there is no data
for the third or fourth matches. Everything seems
to work fine, including the null values for $3 and $4;
All of the exhibited behavior of the program seems
to be defined by perl's programming rules, to the
best of my knowlege.
Should I 1) Approach this problem using a different methodology?
2) Ignore the warnings and run with -w off?
3) RTFM?
Thanks,
David S. Patterson
--
"You can't achieve the impossible unless you attempt the absurd..."
------------------------------
Date: Tue, 23 Sep 1997 02:32:48 +0300
From: "Lefteris Xanthoudakis" <webmaster@www.aquanet.gr>
Subject: pattern matching
Message-Id: <874971376.770690@pluto.hol.gr>
Hi all,
I need a pattern match to discard C comments from a file like
s / \ / \ * . * ? \ * \ \ / /gm
but I can't make it work when the comments begin in one line and end in
another.
Can anyone help?
Cheers, Lefteris
------------------------------
Date: 23 Sep 1997 02:36:45 +0200
From: Jon Kvebaek <jkv@a.sol.no>
Subject: Re: pattern matching
Message-Id: <yqpohgbcvpb6.fsf@hullet.a.sn.no>
"Lefteris Xanthoudakis" <webmaster@www.aquanet.gr> writes:
> Hi all,
>
> I need a pattern match to discard C comments from a file like
>
> s / \ / \ * . * ? \ * \ \ / /gm
>
> but I can't make it work when the comments begin in one line and end in
> another.
> Can anyone help?
This is in the FAQ.
(by Jeffrey Friedl:)
$/ = undef;
$_ = <>;
s#/\*[^*]*\*+([^/*][^*]*\*+)*/|("(\\.|[^"\\])*"|'(\\.|[^'\\])*'|\n+|.[^/"'\\]*)#$2#g;
print;
The Perl FAQ is available from http://www.perl.com/ along with lots of
other useful resources.
--
Jon Kvebaek <jkv@a.sol.no>
In my CD-player now: Suede / Coming Up
------------------------------
Date: Tue, 23 Sep 1997 01:48:45 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: pattern matching
Message-Id: <342f1fce.1033717807@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Tue, 23 Sep 1997 02:32:48 +0300, "Lefteris Xanthoudakis"
<webmaster@www.aquanet.gr> wrote:
> Hi all,
>
>I need a pattern match to discard C comments from a file like
>
>s / \ / \ * . * ? \ * \ \ / /gm
>
>but I can't make it work when the comments begin in one line and end in
>another.
Some useful hints at:
http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html#I_m_having_trouble_matching_over
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"That's an example of how Perl can bring school yard cruelty to new heights."
-- Jon Orwant at the 1st Annual Perl Conference
------------------------------
Date: Mon, 22 Sep 1997 18:36:30 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Problem with files!!! Please help me!
Message-Id: <udv606.173.ln@localhost>
Dan Norcott (dagon@dagon.co.uk) wrote:
: My problem is with the following piece of code:
: foreach $followup_num (@followup_num) {
: open(FOLLOWUP,"$basedir/$mesgdir/t$followup_num\.$ext");
: @followup_lines = <FOLLOWUP>;
: close(FOLLOWUP);
Your indenting 'style' makes me want to cry.
It will make it harder to maintain your code...
: open(FOLLOWUP,">$basedir/$mesgdir/t$followup_num\.$ext");
: foreach $followup_line (@followup_lines) {
: $work = 0;
: if ($followup_line =~ /<ul>/) {
: print FOLLOWUP "<ul>\n<li><a href=\"$num\.$ext\">$subject</a> <b>$name</b> <i>$date</i></li>\n";
last; # is this what you mean?
# it bails out of the foreach loop the first time the 'if' is true
That print statement sure is hard to read. You may want to try a here-doc:
[ you don't need to backwack the dot either... ]
print FOLLOWUP <<ENDFOLLOWUP;
<ul>
<li><a href="$num.$ext">$subject</a> <b>$name</b> <i>$date</i></li>
ENDFOLLOWUP
: }
: else
: { print FOLLOWUP "$followup_line"; }
: }
: close(FOLLOWUP);
: }
: This is a modified version of the code that was in the original script, but
: as I am new to PERL, there's something quite basic I can't work out.
: This piece of code looks through all the files in the 'followup_num' array,
: and adds that bit of HTML in the correct place. However, I only want it to
: alter the first file from that array, and as I am new to the language, I
: dont
: Anyone kind enough to aid a struggling fellow, please email me at
: dan@NOSPAMdagon.co.uk (remove NOSPAM).
Asking for email and munging your address at the same times seems to
be working at cross purposes...
[ Your address in the header is *not* munged though? ]
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: 22 Sep 97 23:51:59 GMT
From: morpheus@no-spam.calweb.com (Steve Lamb)
Subject: Re: Problems with variables as subs?
Message-Id: <slrn62e1k1.h6.morpheus@death.calweb.com>
On Mon, 22 Sep 1997 02:59:16 GMT, Andrew M. Langmead <aml@world.std.com> wrote:
>What you are creating is a "symbolic reference" to the subroutine
>blah. It works, but if possible, why not create a hard reference instead.
>
>$subname = \&bah;
>
>if(1 == 1) {
> &$subname;
>}
Because the variable name is going to constantly change. Right now it
could be one of: help, version, index. More will be added as time goes by.
However, are you saying it would be possible to do something like:
$subname = \&$subtorun;
>Another thing to point out, is you can use the expresson
>"defined(&$subname)" in a conditional expression to test if the
>subroutine exists.
Interesting, thanks. That'll help shortcut some logic.
--
Steve C. Lamb | Opinions expressed by me are not my
http://www.calweb.com/~morpheus | employer's. They hired me for my
CC: from news not wanted or appreciated| skills and labor, not my opinions!
---------------------------------------+-------------------------------------
------------------------------
Date: Mon, 22 Sep 1997 20:09:13 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: Problems with variables as subs?
Message-Id: <342716B9.519FDB95@gpu.srv.ualberta.ca>
Steve Lamb wrote:
>
[snip]
> However, are you saying it would be possible to do something like:
>
> $subname = \&$subtorun;
sure seems possible:
sub mysub {
my $arg=shift||"foo";
print "it works...$arg\n";
}
$subtorun="mysub";
&$subtorun("fee");
$subtorun->("fi");
$subname = \&$subtorun;
&$subname();
$subname->("bar");
but I think Andrew Langmead's suggestion of
a hash of sub references gives a very convenient
and consistent name=>sub mapping.
regards
andrew
------------------------------
Date: Mon, 22 Sep 1997 18:43:54 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Regular Expressions
Message-Id: <qrv606.s73.ln@localhost>
Scott Cullen (scott.cullen@creativeloafing.com) wrote:
: I have some lines of HTML that always begin with a <P> and a <B> tag.
: These tags are then followed by a couple of words, then the next line is
: always a single word. It look like this:
: <P><B>Arts & Entertainment
: Clemson
: I need to add a <BR> tag after Entertainment (which I have already
: done). My problem is I also need to add a <BR> tag after Clemson. I'm
: having trouble using Perl's Regex to, in layman's terms, "always put a
: <BR> after the last word on the next line after a line that begins with
: a <P><B> tag.
-------------------
#!/usr/bin/perl -w
while (<DATA>) {
if ( s/^(<P><B>.*)\n/$1<BR>\n/) {
print;
$_ = <DATA>; # get the next line
s/$/<BR>/; # tack a <BR> onto the end
}
print;
}
__DATA__
<P><B>Arts & Entertainment
Clemson
-------------------
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 23 Sep 1997 01:10:53 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: Regular Expressions
Message-Id: <342d1662.1031305899@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Mon, 22 Sep 1997 18:32:18 -0400, Scott Cullen
<scott.cullen@creativeloafing.com> wrote:
>I have some lines of HTML that always begin with a <P> and a <B> tag.
>These tags are then followed by a couple of words, then the next line is
>always a single word. It look like this:
>
><P><B>Arts & Entertainment
>Clemson
>
>I need to add a <BR> tag after Entertainment (which I have already
>done). My problem is I also need to add a <BR> tag after Clemson. I'm
>having trouble using Perl's Regex to, in layman's terms, "always put a
><BR> after the last word on the next line after a line that begins with
>a <P><B> tag.
Though it's not a pretty solution, it appears to work:
---replace.pl---
#!/usr/bin/perl -w
use strict;
my $replace = 0;
while(<>) {
if ($replace) {
$replace = 0;
chomp;
print "$_<BR>\n";
} elsif (/^(<P><B>.*)$/) {
$replace =1;
print "$1<BR>\n";
} else {
print;
} # end if-else
} # end while
---end---
And the test file I ran it with (like ./replace.pl < replace.txt):
---replace.txt---
<P><B>Test Line
Second Line
Blah
Blah
Blah
<P>Decoy...
Decoy, too...
<P><B>The Real Thing!
Hit me...
---end---
And, of course, the output:
---output---
<P><B>Test Line<BR>
Second Line<BR>
Blah
Blah
Blah
<P>Decoy...
Decoy, too...
<P><B>The Real Thing!<BR>
Hit me...<BR>
---end---
As I said, it seem to work. Mind you, I wrote this in about two
minutes, so your milage may vary.
If nothing else, you've got an example to work from. Feel free to
improve upon it!
Good Luck,
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"These constraints effectively ruled out the obvious choices of using
plain fingers (yogurt is not a finger food at work), and of constructing
a make-shift spoon from paper clips, scraps of paper, and scotch tape."
-- Justin Dolske (dolske@cis.ohio-state.edu> in alt.hackers
------------------------------
Date: 23 Sep 1997 00:56:33 GMT
From: Greg Land <gland@ccs.neu.edu>
Subject: running a macro
Message-Id: <607441$ri9$1@camelot.ccs.neu.edu>
Here goes... I have been attempting to learn perl32 and have come
accross a question. I have looked at the docs, but to no eval.
The question is if I have a macro is written and saved in the
"personal workbook". How would you go about runnimg it from
within a perl script?
Thanks in advance
Greg
------------------------------
Date: Tue, 23 Sep 1997 00:53:04 GMT
From: jvgorkum@dds.nl (Jeroen van Gorkum)
Subject: Re: Script to Capitalize HTML Tags
Message-Id: <342810d0.13519019@news.a1.nl>
Henry Churchyard's htmlsrpl.pl script has an upper casing option. It
is in his htmlchek package. You can get it at:
http://uts.cc.utexas.edu/~churchh/htmlchek.html
"upcase=1
If this option is present, then tag names (the sequence of
non-whitespace immediately following a `<' character) are upper-cased.
Does not upper-case tag options (attributes)."
--JvG
------------------------------
Date: Tue, 23 Sep 1997 00:59:54 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: simple script
Message-Id: <EGxs3v.Jyw@world.std.com>
tfletche@pcocd2.intel.com (Terry Michael Fletcher - PCD ~) writes:
>i know the opening and closing sucks, but you only have to do it once, and
>you dont have to worry about NT systems that might not have grep (how dare
>they! :-) ).
Any perl that runs on NT will have a perl function named "grep". So
there are no portability problems there.
The may not have a grep executable, but its not like they do the same
thing. (Does anybody else think that grep was the worst possible name
for a "return scalars in which this expression returns true"
function?)
--
Andrew Langmead
------------------------------
Date: Tue, 23 Sep 1997 10:50:49 +1000
From: Chris Phillips <cphillip@kerr.phys.utas.edu.au>
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <Pine.GSO.3.94.970923105002.1357F-100000@kerr.phys.utas.edu.au>
On 22 Sep 1997, Michael A. Watson wrote:
> You left out the total users that were told to read the FAQ or "get a good
> PERL book" instead of giving them useful help.
>
This *IS* useful help
Chris Phillips
-------------------------------------------------------------------
Department of Physics, Radio Astronomy Group, University of Tasmania
email: Chris.Phillips@utas.edu.au
Phone: (03) 62262405 (Work), (03) 62485285 (Telescope)
(03) 62278324 (Home), (03) 62262410 (Fax)
------------------------------
Date: Mon, 22 Sep 1997 21:58:12 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <comdog-ya02408000R2209972158120001@news.panix.com>
In article <606q4j$h92$1@news.wco.com>, "Michael A. Watson" <fishrman@shell.wco.com> wrote:
>You left out the total users that were told to read the FAQ or "get a good
>PERL book" instead of giving them useful help.
that is useful help.
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: 22 Sep 1997 20:14:25 -0600
From: mfuhr@dimensional.com (Michael Fuhr)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <6078m1$oac@flatland.dimensional.com>
comdog@computerdog.com (brian d foy) writes:
> In article <606q4j$h92$1@news.wco.com>, "Michael A. Watson" <fishrman@shell.wco.com> wrote:
>
> >You left out the total users that were told to read the FAQ or "get a good
> >PERL book" instead of giving them useful help.
>
> that is useful help.
Agreed -- telling someone to RTFM is perfectly acceptable as long
as you show them which FM to R.
"Give a man a subroutine and he programs for a day.
Teach a man to RTFM and he programs for a lifetime."
--
Michael Fuhr
http://www.dimensional.com/~mfuhr/
------------------------------
Date: Mon, 22 Sep 1997 19:17:26 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <mq1706.rc3.ln@localhost>
Michael A. Watson (fishrman@shell.wco.com) wrote:
: You left out the total users that were told to read the FAQ or "get a good
: PERL book" instead of giving them useful help.
^^^^^^^^^^
Consulting the answer in the FAQ *is* useful help.
More often than not, more helpful than getting an answer from a
single person, who may be wrong...
The answers in the FAQ have been examined by _hundreds_ of people
(hence the 'F' in FAQ ;-). Mistakes in the answers are quickly
corrected by any of dozens of readers of the FAQ.
----
If you feel that such a statistic would be of wide interest to the
Perl community, then you have an opportunity to contribute by
developing an automated algorithm for counting them.
Maybe Greg will include it.
----
I am interested in hearing why you think that pointing someone to
a validated answer is not helpful.
Could you offer some rationale for your position?
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 22 Sep 1997 21:54:23 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: symbolic dereferencing of my() variables -- can it be done?
Message-Id: <comdog-ya02408000R2209972154230001@news.panix.com>
In article <606j7s$9n3$1@samba.rahul.net>, c.c.eiftj@78.usenet.us.com (Rahul Dhesi) wrote:
>But I also want to be able to do the same thing with my() variables, and
>the symbolic dereferencing I am doing above does not work any more. I
>am forced to use eval instead:
Advanced Perl Programming [1] will answer your questions about references,
lexical variables, and all manners of symbol table fun :)
[1]
Advanced Perl Programming
Sriram Srinivasan
ISBN 1-56592-220-4
<http://www.oreilly.com>
--
brian d foy <comdog@computerdog.com>
NY.pm - New York Perl M((o|u)ngers|aniacs)* <URL:http://ny.pm.org/>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
------------------------------
Date: Tue, 23 Sep 1997 02:27:22 GMT
From: Jason Livingston <bigred@pmpro.com>
Subject: Terminating Win32 perl programs
Message-Id: <3427290A.5F1@pmpro.com>
I've got the "generic" Borland compiled version
of Perl 5.004 running under Win95.
I've got a monitor process written in perl
that starts as boot and runs until the
machine is rebooted, etc...
Unfortunately, Win95 will not automatically
terminate the perl process. A dialog box
pops up demanding that the user terminate
this process before Win95 can shutdown, etc.
My problem is that there is no user for my
machine, it is running headless.
Any hints to have Win95 terminate the perl
program are more than welcome.
Jim
moore@pmpro.com
------------------------------
Date: Tue, 23 Sep 1997 00:57:09 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: what's wrong in this function?
Message-Id: <342a12c8.1030383172@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Sun, 21 Sep 1997 02:12:53 GMT, "Tam, Kai Fai" <tam1@uwindsor.ca>
wrote:
>Hi! Everyone,
>
>Do you have any idea about what's wrong in the function below,
>no matter syntax or style?
>
>
>sub award
>{
> local ($tmpflags);
>
> $tmpflags=$flags; $flags="g"; &matchaction; $flags=$tmpflags;
>}
Hm. I suppose the important question here is: What are you expecting
it to do?
I can only assume that it's doing something with 'global' variables,
since you're not passing any data into this sub. Also, what does
&matchaction do? Without seeing the code for it, I'd have a hard time
predicting what's going on.
Okay, that was more than one question. :-)
It looks like legit code, but then again, it's just a fragment.
Have you tried running it under perl -w to see if it complains about
anything?
Jeremy
--
Jeremy D. Zawodny
WCNet Technical Geek & Web Stuff
<URL:http://www.wcnet.org/~jzawodn/>
"These constraints effectively ruled out the obvious choices of using
plain fingers (yogurt is not a finger food at work), and of constructing
a make-shift spoon from paper clips, scraps of paper, and scotch tape."
-- Justin Dolske (dolske@cis.ohio-state.edu> in alt.hackers
------------------------------
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 1061
**************************************
