[8482] in Perl-Users-Digest
Perl-Users Digest, Issue: 2099 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Mar 14 15:07:45 1998
Date: Sat, 14 Mar 98 12:00:31 -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, 14 Mar 1998 Volume: 8 Number: 2099
Today's topics:
(NT) Which command processor gets used for "system"? (Vincent Fatica)
Re: Are There Any Snazzy Perl Editors for Windows? <burchd@erols.com>
Re: closing files (sometimes not & effiency) (Kevin B Cohen)
Re: daemon problem - signals (LONG) <chasecreek.systemhouse@usa.net>
Re: find a word <rjk@coos.dartmouth.edu>
Re: Getting Remote File Size <chasecreek.systemhouse@usa.net>
Re: Help sought with web programming security problem <Andrew_B._Rothman/SRCMN@srcinc-mn.com>
Re: Help sought with web programming security problem <chasecreek.systemhouse@usa.net>
INPUT type=file supervisor@interactivewebsites.com
Re: INPUT type=file <chasecreek.systemhouse@usa.net>
Re: Is there a "Newsgroup" for Newbies to Perl? (Craig Berry)
Re: Is there a "Newsgroup" for Newbies to Perl? (I R A Aggie)
Re: Is there a "Newsgroup" for Newbies to Perl? (I R A Aggie)
Listing subdirectories... <tjbtech@rtweb.net>
Re: ls -l to an array and pull 3 columns on data <rjk@coos.dartmouth.edu>
mkdir won't work... <tjbtech@rtweb.net>
Newbiequestion (mail) <javaneese@hotmail.com>
Re: Newbiequestion (mail) <chasecreek.systemhouse@usa.net>
Re: NT option pack 4 <sowmaster@juicepigs.com>
Re: Ordering Numbers <chasecreek.systemhouse@usa.net>
Re: Ordering Numbers <ajohnson@gpu.srv.ualberta.ca>
Re: Pattern matching? (Sameer Anand Siruguri)
Re: perl binary for SGI <justinb@cray.com>
Re: Perl4 vs Perl 5 (Matt Elrod)
Re: Perl4 vs Perl 5 <chasecreek.systemhouse@usa.net>
Re: Perl4 vs Perl 5 (Matt Elrod)
POD converter -- problem with texinfo <jari.aalto@poboxes.com>
Reading input without echoing in Win32 (tnarinen)
Re: Redirecting to a script on another server. <chasecreek.systemhouse@usa.net>
Running a Perl script SUID <pinky@mail.usmo.com>
Re: Running a Perl script SUID <chasecreek.systemhouse@usa.net>
Re: splitting by one or more values <chasecreek.systemhouse@usa.net>
TK for win32 ??? <Ask@me.com>
Re: TK for win32 ??? <chasecreek.systemhouse@usa.net>
Re: Trimming a Variable <rjk@coos.dartmouth.edu>
Re: User-interface Quandary (Kenneth Herron)
Win32 & HTTP: how? (John English)
Re: You have 1 message(s) - how to print plurals? (Kevin B Cohen)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 14 Mar 1998 16:32:41 GMT
From: vefatica@syr.edu (Vincent Fatica)
Subject: (NT) Which command processor gets used for "system"?
Message-Id: <350ba8ee.82641261@news.ican.net>
I have installed both the ActiveState (5.003) and the Standard (5.004) versions
of PERL. I generally use the 4NT.EXE or TCSH.EXE command processor and I have
%COMSPEC% set to 4NT.EXE. PERL 5.003 appeaers to use %COMSPEC% for "system"
calls while 5.004 seems to use the NT default of CMD.EXE (see below for results
I get under any command processor). Is this actually the case, and do I have any
control over which command processor is used by the Standard version (5.004),
for example with an environment variable?
v:\> k:\perl5003\bin\Perl.exe -e "system 'ver"' [Active State]
4NT 3.01A Windows NT 4.00
v:\> k:\Perl5004\bin\perl.exe -e "system 'ver'" [Standard]
Windows NT Version 4.0
Thank you.
- Vince
___
Vincent Fatica
Syracuse University Mathematics
vefatica@syr.edu
http://barnyard.syr.edu/~vefatica/
------------------------------
Date: Sat, 14 Mar 1998 11:45:13 -0500
From: David Burch <burchd@erols.com>
Subject: Re: Are There Any Snazzy Perl Editors for Windows?
Message-Id: <350AB419.B8922C77@erols.com>
There is Lemmy, A vi clone with Perl syntax highlighting.
Rob Wilson wrote:
> I would recommend textpad (http://www.textpad.com). This has a nice clip
> library feature where you simply double-click the function you want (it even
> lets you know what kind of arguments to use with the functions. Also, it
> supports auto-indenting and other fun features. I regularly use this program
> and recommend it highly.
>
> Tommy (tkho@technologist.com) wrote:
> : May be I don't know much about Multi-Edit, or Perl element is an extra,
> : my Multi-Edit does not support Perl tag. However, it support BASIC, C,
> : COBOL, and HTML. If you have the Perl's Tag file, could you send it to
> : me. Thanks.
> :
> : BTW, I agree Multi-Edit is very well-developed authoring program. Its
> : "Find and Replace", "Line Numbering", "Hex Mode", and "File Comparing"
> : functions are superb. You may not find these function on other editors.
> :
> : scott@softbase.com wrote:
> : >
> : > Keith Turner (rkturner@us.ibm.com) wrote:
> : > > Are there any text editors for windows that can recognize perl syntax and
> : > > color code and such?
> : >
> : > Well, there's GNU Emacs. It's the best thing going for Perl on Windows.
> : >
> : > Multi-Edit is a great commercial editor that supports Perl syntax
> : > highlighting. It has a very Windows look and feel, if you're not
> : > used to Emacs. It also does really great printing, something
> : > Emacs doesn't.
> : >
> : > For more on Windows editors, check out www.skwc.com/essent/cyberreviews.html
> : > and look for the text editor review.
> : >
> : > Scott
> :
> : --
> :
> : Tommy Ho
> :
> : ---------------------------------------------------------------
> : Email: tkho@technologist.com
> : URL: http://www.geocities.com/ResearchTriangle/Lab/4670/
> : WebPager: http://wwp.mirabilis.com/4763891
> :
> : Virtual Network and Conference available on Request
>
> --
> Rob Wilson
> EH.Net Systems Administrator
> rwilson@eh.net
------------------------------
Date: 14 Mar 1998 14:28:21 -0500
From: kcohen@julius.ling.ohio-state.edu (Kevin B Cohen)
Subject: Re: closing files (sometimes not & effiency)
Message-Id: <6eelol$631@julius.ling.ohio-state.edu>
well, i can come up with at least one situation where not closing
filehandles leads to a problem. i occasionally write scripts that
loop through a directory, opening each file, looking at its contents,
and then moving it somewhere. if i don't close the filehandle, then
the last file in the directory doesn't get moved. close filehandles,
and of course everybody gets moved to wherever it is that they ought
to go.
kevin
------------------------------
Date: Sat, 14 Mar 1998 16:24:46 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
To: Axel Elfner <gollywobble@worldnet.att.net>
Subject: Re: daemon problem - signals (LONG)
Message-Id: <350AADFD.8956CF86@usa.net>
Mailed & Posted:
I have found this MultiThreaded Server model
(the code is almost directly out of the Perl
on-line documentation) works well and has
been stable for months... Here is the server portion:
#!/usr/local/bin/perl -Tw
require 5.003;
use strict;
BEGIN { $ENV{PATH} = '/usr/ucb:/bin' }
use Socket;
use Carp;
sub spawn; # forward declaration
sub logmsg { print "mtServer: $0 $$: @_ at ", scalar localtime, "\n" }
my $port = shift || 2345;
my $proto = getprotobyname('tcp');
socket(Server, PF_INET, SOCK_STREAM, $proto) ||
die "socket: $!";
setsockopt(Server, SOL_SOCKET, SO_REUSEADDR, pack("l", 1)) ||
die "setsockopt: $!";
bind(Server, sockaddr_in($port, INADDR_ANY)) ||
die "bind: $!";
listen(Server,SOMAXCONN) ||
die "listen: $!";
logmsg "mtServer started on Port $port";
my $waitedpid = 0;
my $paddr;
sub REAPER {
$SIG{CHLD} = \&REAPER; # Learn to loathe sysV :-(
$waitedpid = wait;
logmsg "mtReaped $waitedpid" . ($? ? " with exit $?" : '');
}
$SIG{CHLD} = \&REAPER;
for ( $waitedpid = 0;
($paddr = accept(Client,Server)) || $waitedpid;
$waitedpid = 0, close Client)
{
next if $waitedpid;
my($port,$iaddr) = sockaddr_in($paddr);
my $name = gethostbyaddr($iaddr,AF_INET);
logmsg "mtConnection from $name [",
inet_ntoa($iaddr), "]
at Port $port";
spawn sub {
print "mtServer: Hello there, $name, it's now ", scalar localtime,
"\n";
exec '/usr/bin/ps -ef'
or confess "mtCan't exec 'Requested': $!";
};
}
sub spawn {
my $coderef = shift;
unless (@_ == 0 && $coderef && ref($coderef) eq 'CODE') {
confess "mtUsage: spawn CODEREF";
}
my $pid;
if (!defined($pid = fork)) {
logmsg "mtCannot fork: $!";
return;
} elsif ($pid) {
logmsg "mtBegat $pid";
return; # i'm the parent
}
# else i'm the child -- go spawn
open(STDIN, "<&Client") || die "can't dup client to stdin";
open(STDOUT, ">&Client") || die "can't dup client to stdout";
## open(STDERR, ">&STDOUT") || die "can't dup stdout to stderr";
exit &$coderef();
}
HTH,
Sneex :)
Axel Elfner wrote:
> Environment:
> Perl 5.003 & 5.004
> AIX 4.1.4 & 4.2.1
>
> I have a script which is used to generate notifications (page/email) for
>
> events monitored by applications such as Netview/Tivoli. It essentially
>
> acts as a lookup mechanism, mapping people to systems, so when an alert
> is processed for a particular system, the correct people get notified.
>
> <Snipped other msg portion. Save space in Cyberspace!>
> Thanks.
>
> Axel Elfner
> elfner@us.ibm.com
------------------------------
Date: Sat, 14 Mar 1998 12:01:08 -0500
From: Ronald J Kimball <rjk@coos.dartmouth.edu>
To: Francesc Guasch <frankie@etsetb.upc.es>
Subject: Re: find a word
Message-Id: <350AB7D5.7D7C2BCC@coos.dartmouth.edu>
[posted and mailed]
Francesc Guasch wrote:
>
> Someone gives me $a="blah "
> spaces
>
> I want $b="blah" but I've been playing with \W and \w
> unsuccessfully and I'm driving myself crazy 'cause I
> see it must be EASY
>
> I tried many many things ...
> why didn't that worked ?
>
> $_="blah ";
> $b=~ /(\W)/g
>From the documentation for perlre:
\w Match a "word" character (alphanumeric plus "_")
\W Match a non-word character
....
Note that \w matches a single alphanumeric character, not a whole word.
To match a word you'd need to say \w+.
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J. Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 14 Mar 1998 16:10:11 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
To: Jesse Rosenberger <jesse@savalas.com>
Subject: Re: Getting Remote File Size
Message-Id: <350AAA94.DA30874C@usa.net>
Posted and Mailed:
A quick answer is to ftp over to www.perl.com
and look for isize.
HTH,
Sneex :)
Jesse Rosenberger wrote:
> How would you go about writing a perl script that would open a remote
> image (from a url: ex. http://www.yourdomain.com/myimage.gif) and and
> get a local perl script to get the file size (in bytes) and print it out
>
> to the browser? If someone could provide an example of how to do
> this...it would be greatly appreciated. Thanks in advance.
>
> Thanx,
> Jesse Rosenberger
> Webmaster - Savalas Productions, Inc.
> http://www.savalas.com
> webmaster@savalas.com
------------------------------
Date: Sat, 14 Mar 1998 10:54:23 -0600
From: Andrew Rothman <Andrew_B._Rothman/SRCMN@srcinc-mn.com>
To: wdl@isporg.com
Subject: Re: Help sought with web programming security problem
Message-Id: <350AB63F.6180@srcinc-mn.com>
Woody:
Steve is both correct and incorrect. It's true that someone could copy
your GIF, but incorrect that the question has nothing to do with Perl.
One answer off the top of my head is to make the GIF dynamic. Off the
top of my head, here's a suggestion. Using SSI, put the current time and
date at the top of the page. Have the PERL (See, Steve?) CGI program
return a built-on-the-fly GIF with the time and date in it (see almost
any web counter CGI for how to imbed numbers in a GIF). Tell users that
date and time must match (and must be the real date and time) or the
page is fake.
Hope this helps.
Steve:
Think CONSTRUCTIVE criticism. Constructive. And have a nice day.
Steve Linberg wrote:
>
> In article <3508F97E.61B4@isporg.com>, Woody <wdl@isporg.com> wrote:
>
> > I am in need of a way of providing web page readers with a visual
> > certification that they are viewing an "official" web page and
> > not someone's copy of it. I have been thinking along the lines
> > of developing a "seal of approval" gif file image which will be kept
> > secure. At the top of each web page using this scheme would be a request
> > to a CGI program for the "seal of approval" image. If the requesting
> > page were a "proper" one (i.e. located on the secured server rather
> > than on someone's own server) the program would return the gif file.
> > Otherwise, the program would return a different "seal of unapproval"
> > gif file contents.
> >
> > So, can one do this and if so how or what might be another approach?
>
> 1. What does this question have to do with Perl?
> 2. What's to stop me from stealing your image and putting it on my web
> page? I don't have to call your CGIs.
> _____________________________________________________________________
> Steve Linberg National Center on Adult Literacy
> Systems Programmer &c. University of Pennsylvania
> linberg@literacy.upenn.edu http://www.literacyonline.org
--
=======================================================
Andrew Rothman Systems
Practice Consultant Resources
612.340.1234 Consulting
andrew.rothman@srcinc-mn.com www.srcinc-mn.com
=======================================================
------------------------------
Date: Sat, 14 Mar 1998 19:02:43 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: Help sought with web programming security problem
Message-Id: <350AD303.5BC69A65@usa.net>
This is an excellent idea :)
Andrew Rothman wrote:
> Woody:
>
> Steve is both correct and incorrect. It's true that someone could copy
> your GIF, but incorrect that the question has nothing to do with Perl.
>
> One answer off the top of my head is to make the GIF dynamic. Off the
> top of my head, here's a suggestion. Using SSI, put the current time and
> date at the top of the page. Have the PERL (See, Steve?) CGI program
> return a built-on-the-fly GIF with the time and date in it (see almost
> any web counter CGI for how to imbed numbers in a GIF). Tell users that
> date and time must match (and must be the real date and time) or the
> page is fake.
>
> Hope this helps.
>
> Steve:
>
> Think CONSTRUCTIVE criticism. Constructive. And have a nice day.
>
------------------------------
Date: Sat, 14 Mar 1998 13:07:13 -0600
From: supervisor@interactivewebsites.com
Subject: INPUT type=file
Message-Id: <6eekdr$s0u$1@nnrp1.dejanews.com>
I have an HTML form <input type=file name=image accept=image/gif>
now what do I do with PERL to let me 1)check the size (must be under 50k)
then 2)rename it and save it into a local directory on my apache server?
I am trying to allow users to upload image and I cannot find any reference to
this except for the HTML side, what kind of code do I need?
Any Ideas?
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Sat, 14 Mar 1998 19:57:01 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: INPUT type=file
Message-Id: <350ADFBD.D7A2F3@usa.net>
At www.perl.com research 'isize' and CGI,
plus a little JavaScript...
/^HTH$/
Sneex :)
supervisor@interactivewebsites.com wrote:
> I have an HTML form <input type=file name=image accept=image/gif>
> now what do I do with PERL to let me 1)check the size (must be under 50k)
> then 2)rename it and save it into a local directory on my apache server?
>
> I am trying to allow users to upload image and I cannot find any reference to
> this except for the HTML side, what kind of code do I need?
>
> Any Ideas?
>
> -----== Posted via Deja News, The Leader in Internet Discussion ==-----
> http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: 13 Mar 1998 21:42:50 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Is there a "Newsgroup" for Newbies to Perl?
Message-Id: <6ec98q$q4e$1@marina.cinenet.net>
Josh Carter (josh@removethis.spies.com) wrote:
: I'm not arguing in favor of not using the docs when they answer the
: question -- I personally find almost all the answers I need on the
: various O'Reilly books -- but if someone finds the something confusing,
: I don't think he/she should be flamed for asking about it. If people
: here don't like answering "easy questions" (easy to them, that is), then
: maybe a new group should be created with a no-flames, no-attitude
: charter.
I've never once seen anyone flamed on clpm for posting "I read about
non-greedy matching in the Camel, and it confused me," or "I don't
understand the perldoc on 'split'." Questions like that get polite,
respectful, and helpful answers; Perl gurus are happy to answer them.
It's when someone asks a question which is practically word-for-word a
FAQ, or is such a basic item of language syntax that reading the first 40
pages of the Llama would answer it, that the flamethrowers come out.
: Above all, I think posters to any comp.lang.* newsgroup should receive
: some minimum baseline of respect, since programming isn't an easy thing
I categorically refuse to respect an individual who would rather waste the
time of thousands of people than do five minutes of reading. It seems
others on this group agree with me. No, programming is not an easy thing;
I think part of the problem is that people *expect* it to be easy, expect
to be able to approach it as one would a (say) Windows word processor --
playing with it to learn, rather than reading a single word of the doc
(on- or offline). This simply will not work, and those who expect it to
need an awakening, rude or otherwise.
: to everyone. I've coached plenty of people through various programming
: tasks I consider trivially easy, and I admit it takes a conscious effort
: on my part to remember they are very intelligent people; they just don't
: have the background or "programmer's mindset" that I've aquired through
: many years of hacking around and asking trivially easy questions myself.
Yes, but I'm sure you tried to use the non-human resources available to
you to learn, saving your questions to humans for those cases when you
needed explanation, not information.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: Sat, 14 Mar 1998 14:19:37 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Is there a "Newsgroup" for Newbies to Perl?
Message-Id: <fl_aggie-1403981419370001@aggie.coaps.fsu.edu>
In article <6ed2dn$rda@newsops.execpc.com>, Mark Stackhouse
<stackhou@execpc.com> wrote:
+ I R A Aggie wrote:
+
+ > In article <3508c605.180930773@news.xmission.com>,
doswald@xmission.com wrote:
+ >
+ > + A newbie newsgroup would indeed be a nightmare; a zillion questions
+ > + (not unlike this group's current state of affairs) and a half zillion
+ > + wrong answers.
+ >
+ > Worse than that, tho. The newbies would avoid such a newsgroup and
+ > go looking for the perl wizards newsgroup.
+ Are you being facetious here, or do you really stand behind this statement?
Yes, I do. comp.unix.wizards was created once-upon-a-time as a place for
unix wizards to hang out. My understanding is that it rapidly became a
smoking crater. Why? every newbie with a question felt that the best
answers came from the wizards, and therefor should be asked in the
wizards news group. I mean, whou would _you_ ask a question of? a
fellow newbie, or Larry Wall?
+ Newbies and intermediates would eventually get things hashed out (pun
intended)...
+ and learn along the way.
You forget: there is an infinite supply of newbies. They can't be
bothered to read a FAQ, what makes you think they'll read a charter?
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/CPAN-local/doc/FAQs/cgi/idiots-guide.html>
------------------------------
Date: Sat, 14 Mar 1998 14:26:49 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Is there a "Newsgroup" for Newbies to Perl?
Message-Id: <fl_aggie-1403981426490001@aggie.coaps.fsu.edu>
In article <6ec8ie$r37$1@nnrp1.dejanews.com>, mchunziker@us.fortis.com wrote:
+ exclusive country club, I'd rather see the experts guide new users with some
+ advice and examples than say "read the docs jackass". If you don't have
+ something constructive to offer, why even reply?
That's quite constructive.
Read the docs. If you continue having problems, give enough information
about what you're trying to do, what platform you're on, and what you've
tried, and what you're having problems with or don't quite understand.
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/CPAN-local/doc/FAQs/cgi/idiots-guide.html>
------------------------------
Date: Sat, 14 Mar 1998 12:38:28 -0500
From: Randall Stephenson <tjbtech@rtweb.net>
Subject: Listing subdirectories...
Message-Id: <350AC093.4DC1E6BD@rtweb.net>
I am trying to create an array that contains all of the subdirectories
of a given directory. Here is how I have tried so far:
opendir (DIR, "$basedir/$dir.");
@dirlist = grep(/./,readdir(DIR));
close(DIR);
foreach $item (sort(@dirlist))
{
if ($item =~ /\./)
{
}
else
{
push (@dirs, $item);
}
}
The array always contains as many elements as there are subdirectories;
however, the elements are also empty. Help!
------------------------------
Date: Sat, 14 Mar 1998 12:09:52 -0500
From: Ronald J Kimball <rjk@coos.dartmouth.edu>
To: grindrod@tfn.com
Subject: Re: ls -l to an array and pull 3 columns on data
Message-Id: <350AB9E2.A2AB6AD@coos.dartmouth.edu>
[posted and mailed]
grindrod@tfn.com wrote:
>
> I am trying to send the output of the ls -l command to and array or filehandle
> and the print only 3 of the 9 columns of the output for each line. I did not
> see anything in the FAQ or recent messeges addressing this and have exhaused
> mey efforts to get the desired result. Can some shed light on how to do this?
> I am using perl 5 on SCO Unix.
To put the output of ls into an array:
@ls = `ls -l`;
To get just the columns you want, use unpack. Effective Perl Programming, by
Joseph N. Hall, pg 73, shows an easy way to do this.
Basically, to get a column starting at position 5 that is 7 characters long:
$col = unpack('@5 A7', $line);
To get several columns:
@cols = unpack('@5 A7 @20 A6 @32 A12', $line);
Hope that helps.
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J. Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 14 Mar 1998 12:55:46 -0500
From: Randall Stephenson <tjbtech@rtweb.net>
Subject: mkdir won't work...
Message-Id: <350AC4A0.2BC84984@rtweb.net>
I have tried both commands such as `mkdir [dir]` and mkdir($dir,0777),
but nothing will create a directory on the server through a script.
What seems strange to me is that no error is returned. The script
appears to work, but the directory isn't on the server when I check. I
have consulted the SA of my provider to ask if it could be a security
problem - apparently not... Any ideas???
------------------------------
Date: Sat, 14 Mar 1998 19:46:58 +0100
From: Daniel <javaneese@hotmail.com>
Subject: Newbiequestion (mail)
Message-Id: <350AD0A2.EEE1AB86@hotmail.com>
A real PERL guru desperately needed :-)
I am trying to send a e-mail with formatted text. I just get a boring
"internal error" message from the server.. :|
I have set the rights for the script to 755 and it's uploaded as ASCII.
The path to PERL on the server is correct. Enclosed is an example of
what I want to do.
Does anyone know what wrong I do? All help is highly appreciated!
/Daniel
__________________________________________
#!/bin/perl
setStrings();
mailStrings();
sub setStrings {
$string1 = "First name:";
$string2 = "Surname:";
$string3 = "Address:";
$string4 = "Postal code:";
$string5 = "City:";
$s1 = "Some first name";
$s2 = "Some surname";
$s3 = "Elm street";
$s4 = "123 45";
$s5 = "Washington";
}
sub mailStrings {
open(MAIL,"|$mailprog -t");
print MAIL "To: javaneese\@hotmail.com\n";
print MAIL "From: Daniel\n";
print MAIL "Subject: Test of textformatting\n\n";
format MAIL =
@<<<<<<<<<<<<< @<<<<<<<<<<<<<<
$string1, $s1
$string2, $s2
$string3, $s3
$string4, $s4
$string5, $s5
.
write (MAIL);
close (MAIL);
}
------------------------------
Date: Sat, 14 Mar 1998 19:05:29 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: Newbiequestion (mail)
Message-Id: <350AD3AA.3933C200@usa.net>
Search via DejaNews as this question has been
asnwered (by me and several others) several times :)
Thx,
Sneex :)
Daniel wrote:
> A real PERL guru desperately needed :-)
>
> I am trying to send a e-mail with formatted text. I just get a boring
> "internal error" message from the server.. :|
> I have set the rights for the script to 755 and it's uploaded as ASCII.
> The path to PERL on the server is correct. Enclosed is an example of
> what I want to do.
>
> Does anyone know what wrong I do? All help is highly appreciated!
>
> /Daniel
>
> __________________________________________
>
> #!/bin/perl
>
> setStrings();
> mailStrings();
>
> sub setStrings {
>
> $string1 = "First name:";
> $string2 = "Surname:";
> $string3 = "Address:";
> $string4 = "Postal code:";
> $string5 = "City:";
>
> $s1 = "Some first name";
> $s2 = "Some surname";
> $s3 = "Elm street";
> $s4 = "123 45";
> $s5 = "Washington";
> }
>
> sub mailStrings {
>
> open(MAIL,"|$mailprog -t");
>
> print MAIL "To: javaneese\@hotmail.com\n";
> print MAIL "From: Daniel\n";
> print MAIL "Subject: Test of textformatting\n\n";
>
> format MAIL =
> @<<<<<<<<<<<<< @<<<<<<<<<<<<<<
> $string1, $s1
> $string2, $s2
> $string3, $s3
> $string4, $s4
> $string5, $s5
> .
>
> write (MAIL);
> close (MAIL);
> }
------------------------------
Date: Sat, 14 Mar 1998 12:08:32 -0500
From: Bob Trieger <sowmaster@juicepigs.com>
To: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: NT option pack 4
Message-Id: <350AB990.7618@juicepigs.com>
Jonathan Feinberg wrote:
>
> Bob Trieger <sowmaster@juicepigs.com> writes:
>
> > $file = 'c:\inetpub\scripts\email.txt';
> >
> > You have to back whack the backwhacks;
>
> Backwhacks are wack, jack. Use regular slashes; they'll work just
> fine, and are more legible to other Perlers IMHO.
>
> $file = 'c:/path/to/some/file';
Thanks!
I've been backwhacking all this time and I could have used regular
slashes? When did this come about and when are backwhacked backwhacks
needed?
Bob Trieger
sowmaster@juicepigs.com
------------------------------
Date: Sat, 14 Mar 1998 16:12:22 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: Ordering Numbers
Message-Id: <350AAB17.BD8447F2@usa.net>
Look around at www.perl.com
Many resoures are either there, are
start there; but there is where you should
look first :)
HTH,
Sneex :)
Jesse Rosenberger wrote:
> The problem I notice with doing this is it always outputs "2 4 3 1",
> nothing else. Another question: How would you go about setting this
> value as a variable instead of printing it out? And one more question:
> where can I get this "faq"???
>
> Andrew Johnson wrote:
>
> > Jesse Rosenberger wrote:
> > >
> > > How could you have perl take a set of numbers (1,2,3,4) and put them
> >
> > > into a random order???
> > >
> >
> > @array=qw(1 2 3 4);
> > print "@array[1,3,2,0]\n";
> >
> > I've checked this against other possible random orderings
> > of these numbers, and this ordering is at least as random as
> > any of the other possible ones. The benefit of this one being
> > that it begins with the number 2, which is my favorite random
> > number less than 42.
> >
> > However, if you doubt the randomness of this sequence and would
> > like to produce others, perhaps something in the faq's might
> > be of interest:
> >
> > [danger:ajohnson:~]$ faqgrep random
> > perlfaq4.pod:=head2 Why aren't my random numbers random?
> > perlfaq4.pod:=head2 How do I shuffle an array randomly?
> > perlfaq4.pod:=head2 How do I select a random element from an array?
> > perlfaq5.pod:=head2 How do I randomly update a binary file?
> > perlfaq5.pod:=head2 How do I select a random line from a file?
> >
> > item two looks particularly promising.
> >
> > regards
> > andrew
> > ;-/
------------------------------
Date: Sat, 14 Mar 1998 10:36:44 -0600
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: Ordering Numbers
Message-Id: <350AB21C.5B7E4426@gpu.srv.ualberta.ca>
Jesse Rosenberger wrote:
!
! The problem I notice with doing this is it always outputs
! "2 4 3 1", nothing else.
and you don't like that particular ordering? :-)
! Another question: How would you go about setting this value as a
! variable instead of printing it out?
@another_array=@array[1,3,2,0];
! And one more question: where can I get this "faq"???
the perlfaqs come with Perl (try 'perldoc perlfaq4')...if you
don't have them you can find them at www.perl.com, or head to
your nearest CPAN mirror and get a new Perl.
regards
andrew
------------------------------
Date: Sat, 14 Mar 1998 16:03:35 GMT
From: sam@bhishma.cse.iitb.ernet.in (Sameer Anand Siruguri)
Subject: Re: Pattern matching?
Message-Id: <EptGM0.8tt@bhishma.cse.iitb.ernet.in>
On Thu, 05 Mar 1998 12:24:56 -0700, Keith L. Miller wrote:
>Let's say the user name is miller. It will search through and ignore
>names such as:
> gmiller
>but, it returns
> miller
> j-miller
Because the hyphen is not a \w character and is hence a word boundary. Hence
the match succeeds.
Sam.
>
>Does anyone know why?
>
>------------------------------------
>
> open(PASS, "/etc/passwd");
> while (<PASS>){
> @fields = split(/:/, $_);
> if (/\b$FORM{'USER'}\b/){
> print "$_<BR>";
> }
> }
> close (PASS);
> print @user;
>
--
------------------------------------------------------------------------------
Sameer Anand Siruguri, 4th year, B. Tech. programme,
Department of Computer Science and Engineering,
Indian Institute of Technology, Mumbai, India.
sam@cse.iitb.ernet.in http://www.cse.iitb.ernet.in/~sam
------------------------------------------------------------------------------
------------------------------
Date: 14 Mar 1998 13:01:09 -0600
From: Justin Banks <justinb@cray.com>
Subject: Re: perl binary for SGI
Message-Id: <o8nvhth2j2i.fsf@ebony.cray.com>
George Kamarinos <kamari@fhw.gr> writes:
> I am looking for a perl binary for an SGI Irix 6.2
> I checked CPAN but could not find it. Any pointers would be greatly
> appreciated.
http://reality.sgi.com/scotth_engr/info/perl5.html
-justinb
--
Justin Banks \ if the answer is the same whether you're programming
Silicon Graphics \ in Perl, C, or Visual Modula 17++ with JavaBeans and
Eagan, Minnesota \ Digital Satellite TV Support, it's not a Perl question.
echo '16i[q]sa[ln0=aln100%Pln100/snlbx]sbA0D4D465452snlbxq' | dc
------------------------------
Date: 14 Mar 1998 10:11:11 -0800
From: creator@islandnet.com (Matt Elrod)
Subject: Re: Perl4 vs Perl 5
Message-Id: <uCsC10kbMomV092yn@islandnet.com>
Sneex <chasecreek.systemhouse@usa.net> asked:
}Hmmmm...
}Are there actual users on this system where Perl 4 lives?
}Perl 4 is NOT worth having a living breathing security
}hole in an otherwise intelligently build network :)
The system is actually an extremely intelligently and securely run web site
host, not a full ISP. Scripts are run through a wrapper by trusted clients.
}May I have an account there as well?
I doubt it. They are quite selective.
Ian was interested in hearing what reasons anyone might have for using
Perl4 and, as I had a good one and none of the friendly denizens of
c.l.p.m was helping him out, I thought I'd offer it.
Matt (back to lurking and wading through the RTFM messages) Elrod
Matt Elrod wrote:
> Ronald J Kimball <rjk@coos.dartmouth.edu> wrote:
>
> }I'd be interested in hearing what reasons the other team could possibly
> }come up with for why you *should* go with Perl 4.
>
> Perl4 is faster and uses less overhead than Perl5? I mean, I am no guru but
> why fireup the entire Perl5 interpreter for something as simple as an
> access counter? Suppose you don't *need* all the modules and bells and
> whistles. My favorite ISP provides both 4 and 5 for this very reason.
>
> Matt
------------------------------
Date: Sat, 14 Mar 1998 18:57:16 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
To: Matt Elrod <creator@islandnet.com>
Subject: Re: Perl4 vs Perl 5
Message-Id: <350AD1BC.C3E121C5@usa.net>
Mailed & Potsed:
Obviously.
Also obviously pointing out that no matter how SECURE you say it is, if you have
just one user on it and Perl 4, whether that user means to or not Perl 4 will
come out to BITE them - hard. Is that a good reason?
HTH,
Sneex :)
Matt Elrod wrote:
> Sneex <chasecreek.systemhouse@usa.net> asked:
> }Hmmmm...
> }Are there actual users on this system where Perl 4 lives?
> }Perl 4 is NOT worth having a living breathing security
> }hole in an otherwise intelligently build network :)
>
> The system is actually an extremely intelligently and securely run web site
> host, not a full ISP. Scripts are run through a wrapper by trusted clients.
>
> }May I have an account there as well?
>
> I doubt it. They are quite selective.
>
> Ian was interested in hearing what reasons anyone might have for using
> Perl4 and, as I had a good one and none of the friendly denizens of
> c.l.p.m was helping him out, I thought I'd offer it.
>
> Matt (back to lurking and wading through the RTFM messages) Elrod
>
> Matt Elrod wrote:
>
> > Ronald J Kimball <rjk@coos.dartmouth.edu> wrote:
> >
> > }I'd be interested in hearing what reasons the other team could possibly
> > }come up with for why you *should* go with Perl 4.
> >
> > Perl4 is faster and uses less overhead than Perl5? I mean, I am no guru but
> > why fireup the entire Perl5 interpreter for something as simple as an
> > access counter? Suppose you don't *need* all the modules and bells and
> > whistles. My favorite ISP provides both 4 and 5 for this very reason.
> >
> > Matt
------------------------------
Date: 14 Mar 1998 11:31:53 -0800
From: creator@islandnet.com (Matt Elrod)
Subject: Re: Perl4 vs Perl 5
Message-Id: <witC10kbM8jH092yn@islandnet.com>
Sneex <chasecreek.systemhouse@usa.net> wrote:
}Mailed & Potsed:
}
}Obviously.
Redundantly.
}Also obviously pointing out that no matter how SECURE you say it is, if you
}have just one user on it and Perl 4, whether that user means to or not Perl
}4 will come out to BITE them - hard. Is that a good reason?
No. It is about as useless as advising someone to search Dejanews only to
turn up dozens of postings, containing your keywords, advising people to
search Dejanews.
Having never been bitten, perhaps Ian and I, and dozens of intimidated
lurkers, would benefit from a more complete explanation of what makes Perl4
less secure than Perl5.
Note that Ian did not explain whether or not his project was being
developed for a system connected to the net or a network.
Matt
------------------------------
Date: 14 Mar 1998 18:01:10 +0200
From: Jari Aalto <jari.aalto@poboxes.com>
Subject: POD converter -- problem with texinfo
Message-Id: <ptrn2ettg6x.fsf@uta.fi>
[CC welcomed]
I just downloaded all the pod converters and tested how they
performaed with the supplied perlpod.pod. The pod2texinfo converted
the file ok, but when I tried to make an Emacs info file it gave erros.
jari
styx perl % makeinfo perlpod.texi
Making info file `perlpod.info' from `perlpod.texi'.
perlpod.texi:3: Misplaced `{'.
perlpod.texi:3: Misplaced `}'.
perlpod.texi:6: Misplaced `{'.
perlpod.texi:6: Misplaced `}'.
perlpod.texi:10: @item found outside of an insertion block.
perlpod.texi:17: @item found outside of an insertion block.
perlpod.texi:107: @item found outside of an insertion block.
perlpod.texi:159: Misplaced `{'.
perlpod.texi:159: Misplaced `}'.
perlpod.texi:183: Misplaced `{'.
perlpod.texi:183: Misplaced `}'.
perlpod.texi:186: Misplaced `{'.
perlpod.texi:186: Misplaced `}'.
------------------------------
Date: Fri, 13 Mar 98 20:31:52 GMT
From: tero.narinen@lut.fi (tnarinen)
Subject: Reading input without echoing in Win32
Message-Id: <6ec4sb$tp2$1@juuri.cc.lut.fi>
Hello
Anyone come up with a good way to read user input in win32 without echoing it
to screen? (Yep, to read a password) All tips I've seen tell me how to do it
in unix (system "stty -echo"). I'm considering writing a C-program to call
from perl to accomplish this, but that's only my last option since I'd like to
stick in Perl. Anyone done this?
If not, what's the best way to glue the little C-progt to perl as nicely as
possible. Any web-sites explaining this? Thanks in advance for any help.
###Tero Narinen####################################################
###Skinnarilankatu 28 F 17###"BEWARE THE FURY OF A PATIENT MAN"####
###53850 Lappeenranta###################-John Dryden###############
###tero.narinen@lut.fi#############################################
------------------------------
Date: Sat, 14 Mar 1998 16:02:26 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: Redirecting to a script on another server.
Message-Id: <350AA8C2.3CADF471@usa.net>
Hmmm Was it the Capital L in
print "Location: blah blah blah \n\n";
?
Just curious :)
Sneex
Grahame S Cooper wrote:
> Please accept my most humble apologies. I have just picked up
> my jacket from the dry cleaners' and lo and behold, my brain
> was in the pocket all the time!
>
> I have seen the silly error now and everything works fine.
>
> Cheers,
>
> Grahame
>
> Sneex wrote:
>
> > Off topic, see CGI-related ng:
> >
> > However, I have several security scripts
> > which like to play tennis with each other; so
> > if you could post some code of how you
> > are trying this maybe we could point
> > out something.
> >
> > The short answer is it works for me,
> > what are you doing wrong or otherwise?
> >
> > Could be a firewall issue, or any number of
> > other things...
> >
> > HTH,
> > Sneex :)
> >
> > Grahame S Cooper wrote:
> >
> > > This could be a Perl question or a CGI question.
> > > Apologies if it is off topic.
> > >
> > > I want to redirect from a Perl CGI script to another one
> > > on a different server.
> > >
> > > I have tried using the Location: directive, but it
> > > doesn't seem to work for this purpose, and I can't see
> > > how I would specify whether to use PUT or GET, etc.
> > >
> > > Has anyone done this themselves and have a quick answer?
> > >
> > > Cheers
> > >
> > > --
> > > --------------------------------------------------
> > > Dr Grahame S Cooper
> > > Director
> > > Information Technology Institute
> > > University of Salford
> > > Salford, M5 4WT, ENGLAND
> > >
> > > (Remove the anti spam field to EMail me.)
> > > ==================================================
>
> --
> --------------------------------------------------
> Dr Grahame S Cooper
> Director
> Information Technology Institute
> University of Salford
> Salford, M5 4WT, ENGLAND
>
> (Remove the anti spam field to EMail me.)
> ==================================================
------------------------------
Date: Sat, 14 Mar 1998 11:28:28 -0600
From: Stefan Adams <pinky@mail.usmo.com>
Subject: Running a Perl script SUID
Message-Id: <350ABE3B.833EB17@mail.usmo.com>
I am writing a perl script to change passwords but I need it to run SUID
so that other users can change passwords, but when I do this, I can't
access the system function. It says it is not a proper $ENV{PATH}
Any thoughts?
Stefan Adams
------------------------------
Date: Sat, 14 Mar 1998 19:54:45 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
To: Stefan Adams <pinky@mail.usmo.com>
Subject: Re: Running a Perl script SUID
Message-Id: <350ADF36.EC76E160@usa.net>
Mailed & Posted:
See www.perl.com Search on Security,
See WbPass for ideas, also see other
related packages for other ideas.
/^HTH$/
Snexx :)
Stefan Adams wrote:
> I am writing a perl script to change passwords but I need it to run SUID
> so that other users can change passwords, but when I do this, I can't
> access the system function. It says it is not a proper $ENV{PATH}
> Any thoughts?
> Stefan Adams
------------------------------
Date: Sat, 14 Mar 1998 16:27:57 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
To: Oosterom <oosterom@e-mark.nl>
Subject: Re: splitting by one or more values
Message-Id: <350AAEBE.AFD74161@usa.net>
A search via DejaNews will reveal
quite a bit about this question and
some usable answers :)
HTH,
Sneex :)
Oosterom wrote:
> Hi,
>
> I am trying to extract the date from the localtime value. I have to split
> this value, but if the daynumber is smaller than 10, there are two spaces
> before this number in the localtime value. This means I have to split by
> one or more spaces. The codes below don't work:
>
> ($day, $month, $daynr, $time, $year) = split (/*\s/, localtime);
>
> Any suggestions anyone? Thanks.
>
> Thijs.
------------------------------
Date: Sat, 14 Mar 1998 19:08:09 -0000
From: "Jonathan Tracey" <Ask@me.com>
Subject: TK for win32 ???
Message-Id: <6eekj4$hs4$1@plug.news.pipex.net>
Hi
I have heard there is or going to be a port of TK for win32 to allow us
win32 perl lovers to write scripts which have a visual front end. Does
anyone have any info or am I completely mad :-)
Jon
------------------------------
Date: Sat, 14 Mar 1998 19:52:46 GMT
From: Sneex <chasecreek.systemhouse@usa.net>
Subject: Re: TK for win32 ???
Message-Id: <350ADEBF.778CE6AE@usa.net>
Posted (didn't trust the Ask@Me.com...)
See -
ftp.neosoft.com/pub/tcl
See -
http://sunscript.sun.com/win/wintcl-list.html
Yes, I have TCL/TK v8 on my NT box :)
/^HTH$/
Sneex :)
Jonathan Tracey wrote:
> Hi
>
> I have heard there is or going to be a port of TK for win32 to allow us
> win32 perl lovers to write scripts which have a visual front end. Does
> anyone have any info or am I completely mad :-)
>
> Jon
------------------------------
Date: Sat, 14 Mar 1998 12:01:53 -0500
From: Ronald J Kimball <rjk@coos.dartmouth.edu>
Subject: Re: Trimming a Variable
Message-Id: <350AB802.7B1C406C@coos.dartmouth.edu>
payne.jim@hq.navy.mil wrote:
>
> I want to only get 3 characters of a variable. Can anybody tell me how I can
> do this.
That depends which three characters you want to get.
Have you tried using substr()?
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J. Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 14 Mar 1998 19:39:09 GMT
From: kherron@campus.mci.net (Kenneth Herron)
Subject: Re: User-interface Quandary
Message-Id: <6eemct$4jn$1@news.campus.mci.net>
In article <6ebsam$lfv$1@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> wrote:
|I have
|a very simple point-and-drool database frontend for people who are afraid
|of the keyboard or parentheses. The problem is that I can't for the life
|of me figure out how to talk about a complete/exact/entire/everything
|match, like fgrep -x.
This doesn't seem particularly perl-specific. Perhaps
comp.human-factors would be a better place to post this?
--
Kenneth Herron -- kherron@campus.mci.net
"When Microsoft first took control of the Funk & Wagnalls Encyclopedia
product, there was a flattering biography of Bill Gates. But it said he
was known as a tough competitor. Now it says that he's known for his
charitable contributions." -- Gary Reback, <http://www.ljx.com/reback/>
------------------------------
Date: 14 Mar 1998 16:56:27 GMT
From: je@bton.ac.uk (John English)
Subject: Win32 & HTTP: how?
Message-Id: <6eecrr$s90@saturn.brighton.ac.uk>
I'm running Perl 5.003_07 under Win32 and I want to install the
HTTP module from libwww -- however, there isn't any sign of
ExtUtils::Manifest or MakeMaker or... :-(
Has anyone else successfully installed libwww (or *anything*?)
under Microsoft's braindamaged pride & joy? If so, can you
please give me some words-of-one-syllabub directions?
Email copies of any responses would be appreciated...
-----------------------------------------------------------------
John English | mailto:je@brighton.ac.uk
Senior Lecturer | http://www.it.bton.ac.uk/staff/je
Dept. of Computing | ** NON-PROFIT CD FOR CS STUDENTS **
University of Brighton | -- see http://burks.bton.ac.uk
-----------------------------------------------------------------
------------------------------
Date: 14 Mar 1998 14:24:49 -0500
From: kcohen@julius.ling.ohio-state.edu (Kevin B Cohen)
Subject: Re: You have 1 message(s) - how to print plurals?
Message-Id: <6eeli1$61m@julius.ling.ohio-state.edu>
my favorite language has many words which are inherently plural; to
make them singular, you have to add something to them, in the same way
that in english one adds something to a word to make it plural. e.g.,
siwa 'bees'
siwatat 'bee'
jome 'baboons'
jometat 'baboon'
notice any trend in the referents of inherently plural nouns? hint:
fish/fish, ants/ant, and brother-in-laws/brother-in-law belong to the
same class.
but, back to perl: problems with getting a finite state machine to
handle agreement markers, such as the plural, are one of the classic
chomskyan arguments against using finite state machinery to describe
language. we know that perl's re's aren't really "regular," though,
and therefore aren't finite-state. so, how far can we push a language
with constructs like $+? i guess i think you'd need an augmented
transition network, but if you set its values with reference to what
was matched by $+...
just speculating---
kevin
------------------------------
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 2099
**************************************