[12866] in Perl-Users-Digest
Perl-Users Digest, Issue: 276 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 27 21:07:21 1999
Date: Tue, 27 Jul 1999 18:05:10 -0700 (PDT)
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, 27 Jul 1999 Volume: 9 Number: 276
Today's topics:
Any interest in Perl-based mail reader? (Sean McAfee)
Re: Any interest in Perl-based mail reader? <tchrist@mox.perl.com>
Re: beginner-redirect and download (Abigail)
Re: beginner-redirect and download <llornkcor@llornkcor.com>
Re: cgi HTTP header information (Tad McClellan)
Re: cgi HTTP header information (Abigail)
Conversion Question?? <iberg@montana.edu>
Re: Conversion Question?? (elephant)
Re: converting net address... (Abigail)
Re: converting net address... (Abigail)
Re: Don't want to make file that owner is "NOBODY" <vlad@doom.net>
Re: Getting Height and Width of GIF/JPEG in PERL? (Abigail)
Re: Getting Height and Width of GIF/JPEG in PERL? <revjack@radix.net>
Re: Getting Height and Width of GIF/JPEG in PERL? <tchrist@mox.perl.com>
Re: Help removing special characters from a string <sklivvz@tiscalinet.it>
Re: Help removing special characters from a string (Abigail)
Re: Help removing special characters from a string (Larry Rosler)
Re: How to use a module (Abigail)
Re: Korn Shell or Perl? (elephant)
Re: Little Puzzle I can't solve . . . <sklivvz@tiscalinet.it>
Re: paragraph breaks in text? <vlad@doom.net>
Re: paragraph breaks in text? (Larry Rosler)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 27 Jul 1999 23:43:45 GMT
From: mcafee@waits.facilities.med.umich.edu (Sean McAfee)
Subject: Any interest in Perl-based mail reader?
Message-Id: <Rurn3.2696$nB.424053@news.itd.umich.edu>
I've written a Perl program for the reading and sending of e-mail. I did
this because none of the e-mail packages available do everything exactly
the way I'd like. For lack of a better name, I call it pmc, for "Perl Mail
Client". I'd like to release it to the public, so I thought I'd see if
there's any interest in such a thing.
It's somewhat feature-poor at present, but quite functional; I've been
using it exclusively to read and reply to e-mail for a couple of months
now.
Features include:
o Based on the Curses package
I wanted to be able to run the program over my relatively slow modem
link from home. Anyway, I consider text interfaces to be generally
superior to GUIs.
I've composed a few simple Curses widgets, like a dialog box, for the
entering of prompted input.
o Customizable
The file ~/.pmcrc is executed (with "do") on startup if it exists.
The user may put any desired Perl code into it, such as functions
which may later be used in sorting and filtering expressions.
(To prevent namespace collisions, user code is always evaluated
in package "User".)
o Simple interface to mail header data
Whenever a new mail header field is encountered, a parameterless
function of the same name is created which returns the contents of
that header field for the current message. Filtering criteria are
entered as snippets of Perl code which are eval-ed by pmc:
From =~ /my boss/
(To.Cc) =~ /mailing-list\@majordomo/;
str2time(Date) > str2time("00:00") # show messages sent since midnight
For sorting, additional parameterless functions are created for every
header field, but with "1" and "2" appended to the name.
_Filename1 <=> _Filename2
_Date2 <=> _Date1
Subject1 cmp Subject2
(_Filename is a header pseudo-field which holds the name of the file
containing the message under consideration. _Date is another
pseudo-field which contains the result of Date::Parse::str2time(Date).)
o Advanced sorting
One of the features I wanted to incorporate was the ability to easily
sort messages according to arbitrarily complex rules. In my case
specifically, I belong to a number of mailing lists of low-to-medium
volume, and I didn't want to let procmail just plop each list's
messages into a different folder, as it's a hassle to move between
folders and I often forget to check them regularly. So, I needed a
sorting function that would group messages according to the criteria I
specified. After a bit of work, I wrote one, and now I have something
like the following in my .pmcrc file:
$DEFAULT_SORT = q{
group(
'DEFAULT',
'From =~ /Above the Crowd/',
'(To.Cc) =~ /advocacy/',
'(To.Cc) =~ /CYHIST\@/',
'(To.Cc) =~ /Red Rock Eater/',
'_Filename2 <=> _Filename1'
)
};
First come the messages which don't meet any of the other criteria,
then messages from each of four mailing lists. The final argument
specifies how messages should be sorted within each group.
Deficiencies include, but are not limited to:
o Very limited mailbox support
...Specifically, it can only read messages already arranged into
folders and given numerical filenames, such as what is done by
the likes of MH and procmail. This makes the "Client" part of the
program's name something of a misnomer. Ah well.
o No MIME support
This was actually one of my big original goals: multipart MIME messages
will eventually be displayed in a tree format, with handlers defined
for the various MIME types (for example, running MS-Word documents
through "strings"). Not that I'm all that fond of MIME, but I get
work-related e-mail with MIME attachments so often that I've got to
handle it somehow.
If this sounds like a program you might want to use, let me know.
--
Sean McAfee mcafee@umich.edu
print eval eval eval eval eval eval eval eval eval eval eval eval eval eval
q!q@q#q$q%q^q&q*q-q=q+q|q~q:q? Just Another Perl Hacker ?:~|+=-*&^%$#@!
------------------------------
Date: 27 Jul 1999 18:37:40 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Any interest in Perl-based mail reader?
Message-Id: <379e50d4@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc,
mcafee@waits.facilities.med.umich.edu (Sean McAfee) writes:
:I've written a Perl program for the reading and sending of e-mail. I did
:this because none of the e-mail packages available do everything exactly
:the way I'd like.
That's why I wrote plum. :-)
--tom
--
"It's hard to work in a group when you're omnipotent."
- Q, `Star Trek the Next Generation'
------------------------------
Date: 27 Jul 1999 18:09:26 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: beginner-redirect and download
Message-Id: <slrn7psf09.2er.abigail@alexandra.delanet.com>
James Williamson (james.williamson@bbc.co.uk) wrote on MMCLVI September
MCMXCIII in <URL:news:7nkjfn$so8$1@nntp0.reith.bbc.co.uk>:
''
'' >Abigail
''
'' A Virtual Bully of the lowest form. I bet you don't treat people like this
'' when you aren't masquerading as some form of Usenet schoolmistress. Grow up
'' and learn some humility.
Indeed. In real life, I just chop off peoples fingers, use their
favourite pet for batting practise, or poison their toothpaste.
Usenet is so limiting in what you can do.
Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 27 Jul 1999 18:29:08 -0600
From: llornkcor <llornkcor@llornkcor.com>
Subject: Re: beginner-redirect and download
Message-Id: <g1297h2j.fsf@wind.localdomain>
"James Williamson" <james.williamson@bbc.co.uk> writes:
>
>>Hi,
>>
>>is it possible to tell a penguin to catch a fish and redirect the penguin
>>to another iceberg, or in failing that, man a new ship that starts the
>>fishing and send the original ship to a new iceberg?
>>
>>Your question isn't only poorly phrased, it shows a lack of knowledge
>>on how the web works. But most of all, it's completely off topic here.
>>
>>Go away.
>>
>>
>>Abigail
>>--
>
>A Virtual Bully of the lowest form. I bet you don't treat people like this
>when you aren't masquerading as some form of Usenet schoolmistress. Grow up
>and learn some humility.
>
>James Williamson
Ditto- I dont think it offtopic here, whats the 'misc' in the
comp.lang.perl.misc mean?? I think your condescending answers
(Abigail) are of poor taste, and more off topic than any question here.
------------------------------
Date: Tue, 27 Jul 1999 14:19:39 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: cgi HTTP header information
Message-Id: <r7tkn7.78m.ln@magna.metronet.com>
Richard Garside (richard.garside@zen.co.uk) wrote:
: I tried using HTTP_REFERER
Perl doesn't have anything called "HTTP_REFERER"
You are in the wrong newsgroup.
Sounds like a WWW question.
Try asking it in a newsgroup that is related to WWW stuff
in some way (this newsgroup is not related to WWW stuff,
it is related to Perl stuff).
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 27 Jul 1999 19:01:28 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: cgi HTTP header information
Message-Id: <slrn7psi1s.2er.abigail@alexandra.delanet.com>
Richard Garside (richard.garside@zen.co.uk) wrote on MMCLVI September
MCMXCIII in <URL:news:hckn3.3$0z4.47@newreader.ukcore.bt.net>:
"" Hi,
*plonk*
Abigail
--
perl -MLWP::UserAgent -MHTML::TreeBuilder -MHTML::FormatText -wle'print +(
HTML::FormatText -> new -> format (HTML::TreeBuilder -> new -> parse (
LWP::UserAgent -> new -> request (HTTP::Request -> new ("GET",
"http://work.ucsd.edu:5141/cgi-bin/http_webster?isindex=perl")) -> content))
=~ /(.*\))[-\s]+Addition/s) [0]'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Tue, 27 Jul 1999 17:57:42 -0600
From: "Ivan Berg" <iberg@montana.edu>
Subject: Conversion Question??
Message-Id: <7nlh33$fua$1@news.campuscwix.net>
Anybody have an example of going from binary to decimal and vice versa??
The FAQ has examples but they don't seem to work at all
It seems to all have to do with pack and unpack??
Examples, ideas? Thanks
------------------------------
Date: Wed, 28 Jul 1999 10:28:32 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Conversion Question??
Message-Id: <MPG.1208f9bd20e2ee63989b93@news-server>
Ivan Berg writes ..
>Anybody have an example of going from binary to decimal and vice versa??
>
>The FAQ has examples but they don't seem to work at all
you really think they'd be in there if they didn't work at all ? .. they
just don't work the way you expected
>It seems to all have to do with pack and unpack??
ooh .. wonder why .. what does your manual say pack does ?
admittedly - pack is very powerful and necessarily complex .. but if you
take the time to get to know it then you'll not look back (WARNING: this
may require some reading of manuals and experimentation)
>Examples, ideas? Thanks
let's read the FAQ out loud
"
...use the pack()
function (documented in the section on "pack" in the
perlfunc manpage):
"
so .. let's check the documentation on pack
perldoc -f pack
ooh .. look there .. at the bottom
sub bintodec {
unpack("N", pack("B32", substr("0" x 32 . shift, -32)));
}
it's as though the authors knew that people would be looking for a way to
do this .. must be psychic
--
jason - remove all hyphens for email reply -
------------------------------
Date: 27 Jul 1999 19:08:40 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: converting net address...
Message-Id: <slrn7psifc.2er.abigail@alexandra.delanet.com>
Henrik Gemal (gemal@dk.net) wrote on MMCLVI September MCMXCIII in
<URL:news:379DDFD6.5E0F8CA6@dk.net>:
??
?? Possible links in the text above would be:
?? www.gemal.dk
Really? If that's a possible link (using what scheme?) then anything
containing letters, digits, periods and hyphens would be a link, right?
?? www.gemal.dk/test
?? http://www.gemal.dk
?? http://www.gemal.dk/test
?? http://test.gemal.dk
?? http://test.gemal.dk/test
Well, there's a huge regex on my web site that'll match possible URLs.
http://www.foad.org/%7Eabigail/Perl/url3.regex
See also http://www.foad.org/%7Eabigail/Perl/url2.html
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 27 Jul 1999 19:14:12 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: converting net address...
Message-Id: <slrn7psipm.2er.abigail@alexandra.delanet.com>
Henrik Gemal (gemal@dk.net) wrote on MMCLVI September MCMXCIII in
<URL:news:379E160C.9DFAE6F8@dk.net>:
,, Actually after I looked at txt2html I came up with this:
,, $str =~ s/ftp:[\w\/\.:+\-~\%#?]+[\w\/]/<A HREF=\"$&\"
,, TARGET=\"_blank\">$&<\/A>/ig;
,, $str =~ s/http:[\w\/\.:+\-~\%#?]+[\w\/]/<A HREF=\"$&\"
,, TARGET=\"_blank\">$&<\/A>/ig;
,, $str =~ s/news:[\w\/\.:+\-~\%#?]+[\w\/]/<A HREF=\"$&\"
,, TARGET=\"_blank\">$&<\/A>/ig;
,, $str =~ s/([^\w\-\/\.:\@>])([a-zA-Z][\w+\-]+(\.[\w+\-]+)+\.[a-zA-Z]{2,})/$1<A
,, HREF=\"http:\/\/$2\">$2<\/A>/ig;
,, $str =~
,, s/([^\w\-\/\.:\@>])([a-zA-Z][\w\.+\-]+\.[a-zA-Z]{2,}):(\s*)([\w\d+\-\/\.]+)/$1<A
,, HREF=\"ftp:\/\/$2\/$4\">$2:$4<\/A>$3/ig;
,, $str =~ s/([^\w\-\/\.:\@])(\d{2,}\.\d{2,}\.\d+\.\d+):([\w\d+\-\/\.]+)/$1<A
,, HREF=\"ftp:\/\/$2\/$3\">$2:$3<\/A>/ig;
,, $str =~
,, s/(^|[^\w\d\-\/\.:!])(([a-zA-Z][\w+\-]*)?ftp[\w+\-]*\.[\w\.+\-]+\.[a-zA-Z]{2,})([^\w\d\-\/\.:!])/$1<A
,, HREF=\"ftp:\/\/$2\/" T
,, ARGET=\"_blank\">$2<\/A>$4/ig;
,, $str =~
,, s/(^|[^\w\d\-\/\.:!])(([a-zA-Z][\w+\-]*)?www[\w+\-]*\.[\w\.+\-]+\.[a-zA-Z]{2,})([^\w\d\-\/\.:!])/$1<A
,, HREF=\"http:\/\/$2\/\"
,, TARGET=\"_blank\">$2<\/A>$4/ig;
,, $str =~
,, s/(anonymous\@)([a-zA-Z][\w\.+\-]+\.[a-zA-Z]{2,}):(\s*)([\w\d+\-\/\.]+)/$1<A
,, HREF=\"ftp:\/\/$2\/$4\">$2:$4<\/A>$3/ig;
,, $str =~ s/(ftp\@)([a-zA-Z][\w\.+\-]+\.[a-zA-Z]{2,}):(\s*)([\w\d+\-\/\.]+)/$1<A
,, HREF=\"ftp:\/\/$2\/$4\">$2:$4<\/A>$3/ig;
,, $str =~ s/[a-zA-Z0-9_\+\-\.]+\@([a-zA-Z0-9][\w\.+\-]+\.[a-zA-Z]{2,})/<A
,, HREF=\"compose.cgi?to=$&\">$&<\/A>/ig;
,, $str =~ s/ftp ([a-zA-Z][\w+\-]+(\.[\w\.+\-]+)+\.[a-zA-Z]{2,})/ftp <A
,, HREF=\"ftp:\/\/$1\/">$1<\/A>/ig;
Gosh, is that all? I think you missed a few cases:
s<
(?:http://(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.
)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)
){3}))(?::(?:\d+))?)(?:/(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F
\d]{2}))|[;:@&=])*)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{
2}))|[;:@&=])*))*)(?:\?(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{
2}))|[;:@&=])*))?)?)|(?:ftp://(?:(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?
:%[a-fA-F\d]{2}))|[;?&=])*)(?::(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-
fA-F\d]{2}))|[;?&=])*))?@)?(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-
)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?
:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?))(?:/(?:(?:(?:(?:[a-zA-Z\d$\-_.+!
*'(),]|(?:%[a-fA-F\d]{2}))|[?:@&=])*)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'()
,]|(?:%[a-fA-F\d]{2}))|[?:@&=])*))*)(?:;type=[AIDaid])?)?)|(?:news:(?:
(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[;/?:&=])+@(?:(?:(
?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[
a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3})))|(?:[a-zA-Z](
?:[a-zA-Z\d]|[_.+-])*)|\*))|(?:nntp://(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[
a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d
])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?)/(?:[a-zA-Z](?:[a-zA-Z
\d]|[_.+-])*)(?:/(?:\d+))?)|(?:telnet://(?:(?:(?:(?:(?:[a-zA-Z\d$\-_.+
!*'(),]|(?:%[a-fA-F\d]{2}))|[;?&=])*)(?::(?:(?:(?:[a-zA-Z\d$\-_.+!*'()
,]|(?:%[a-fA-F\d]{2}))|[;?&=])*))?@)?(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a
-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d]
)?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?))/?)|(?:gopher://(?:(?:
(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:
(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+
))?)(?:/(?:[a-zA-Z\d$\-_.+!*'(),;/?:@&=]|(?:%[a-fA-F\d]{2}))(?:(?:(?:[
a-zA-Z\d$\-_.+!*'(),;/?:@&=]|(?:%[a-fA-F\d]{2}))*)(?:%09(?:(?:(?:[a-zA
-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[;:@&=])*)(?:%09(?:(?:[a-zA-Z\d$
\-_.+!*'(),;/?:@&=]|(?:%[a-fA-F\d]{2}))*))?)?)?)?)|(?:wais://(?:(?:(?:
(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:
[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?
)/(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))*)(?:(?:/(?:(?:[a-zA
-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))*)/(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(
?:%[a-fA-F\d]{2}))*))|\?(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]
{2}))|[;:@&=])*))?)|(?:mailto:(?:(?:[a-zA-Z\d$\-_.+!*'(),;/?:@&=]|(?:%
[a-fA-F\d]{2}))+))|(?:file://(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]
|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:
(?:\d+)(?:\.(?:\d+)){3}))|localhost)?/(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'()
,]|(?:%[a-fA-F\d]{2}))|[?:@&=])*)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(
?:%[a-fA-F\d]{2}))|[?:@&=])*))*))|(?:prospero://(?:(?:(?:(?:(?:[a-zA-Z
\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)
*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?)/(?:(?:(?:(?
:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[?:@&=])*)(?:/(?:(?:(?:[a-
zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[?:@&=])*))*)(?:(?:;(?:(?:(?:[
a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[?:@&])*)=(?:(?:(?:[a-zA-Z\d
$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[?:@&])*)))*)|(?:ldap://(?:(?:(?:(?:
(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?:
[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))?
))?/(?:(?:(?:(?:(?:(?:(?:[a-zA-Z\d]|%(?:3\d|[46][a-fA-F\d]|[57][Aa\d])
)|(?:%20))+|(?:OID|oid)\.(?:(?:\d+)(?:\.(?:\d+))*))(?:(?:%0[Aa])?(?:%2
0)*)=(?:(?:%0[Aa])?(?:%20)*))?(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F
\d]{2}))*))(?:(?:(?:%0[Aa])?(?:%20)*)\+(?:(?:%0[Aa])?(?:%20)*)(?:(?:(?
:(?:(?:[a-zA-Z\d]|%(?:3\d|[46][a-fA-F\d]|[57][Aa\d]))|(?:%20))+|(?:OID
|oid)\.(?:(?:\d+)(?:\.(?:\d+))*))(?:(?:%0[Aa])?(?:%20)*)=(?:(?:%0[Aa])
?(?:%20)*))?(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))*)))*)(?:(
?:(?:(?:%0[Aa])?(?:%20)*)(?:[;,])(?:(?:%0[Aa])?(?:%20)*))(?:(?:(?:(?:(
?:(?:[a-zA-Z\d]|%(?:3\d|[46][a-fA-F\d]|[57][Aa\d]))|(?:%20))+|(?:OID|o
id)\.(?:(?:\d+)(?:\.(?:\d+))*))(?:(?:%0[Aa])?(?:%20)*)=(?:(?:%0[Aa])?(
?:%20)*))?(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))*))(?:(?:(?:
%0[Aa])?(?:%20)*)\+(?:(?:%0[Aa])?(?:%20)*)(?:(?:(?:(?:(?:[a-zA-Z\d]|%(
?:3\d|[46][a-fA-F\d]|[57][Aa\d]))|(?:%20))+|(?:OID|oid)\.(?:(?:\d+)(?:
\.(?:\d+))*))(?:(?:%0[Aa])?(?:%20)*)=(?:(?:%0[Aa])?(?:%20)*))?(?:(?:[a
-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))*)))*))*(?:(?:(?:%0[Aa])?(?:%2
0)*)(?:[;,])(?:(?:%0[Aa])?(?:%20)*))?)(?:\?(?:(?:(?:(?:[a-zA-Z\d$\-_.+
!*'(),]|(?:%[a-fA-F\d]{2}))+)(?:,(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-f
A-F\d]{2}))+))*)?)(?:\?(?:base|one|sub)(?:\?(?:((?:[a-zA-Z\d$\-_.+!*'(
),;/?:@&=]|(?:%[a-fA-F\d]{2}))+)))?)?)?)|(?:(?:z39\.50[rs])://(?:(?:(?
:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?)\.)*(?:[a-zA-Z](?:(?
:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:\d+)){3}))(?::(?:\d+))
?)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))+)(?:\+(?:(?:
[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))+))*(?:\?(?:(?:[a-zA-Z\d$\-_
.+!*'(),]|(?:%[a-fA-F\d]{2}))+))?)?(?:;esn=(?:(?:[a-zA-Z\d$\-_.+!*'(),
]|(?:%[a-fA-F\d]{2}))+))?(?:;rs=(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA
-F\d]{2}))+)(?:\+(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))+))*)
?))|(?:cid:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[;?:@&=
])*))|(?:mid:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[;?:@
&=])*)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[;?:@&=]
)*))?)|(?:vemmi://(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z
\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\
.(?:\d+)){3}))(?::(?:\d+))?)(?:/(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a
-fA-F\d]{2}))|[/?:@&=])*)(?:(?:;(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a
-fA-F\d]{2}))|[/?:@&])*)=(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d
]{2}))|[/?:@&])*))*))?)|(?:imap://(?:(?:(?:(?:(?:(?:(?:[a-zA-Z\d$\-_.+
!*'(),]|(?:%[a-fA-F\d]{2}))|[&=~])+)(?:(?:;[Aa][Uu][Tt][Hh]=(?:\*|(?:(
?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[&=~])+))))?)|(?:(?:;[
Aa][Uu][Tt][Hh]=(?:\*|(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2
}))|[&=~])+)))(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[
&=~])+))?))@)?(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])
?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:\.(?:
\d+)){3}))(?::(?:\d+))?))/(?:(?:(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:
%[a-fA-F\d]{2}))|[&=~:@/])+)?;[Tt][Yy][Pp][Ee]=(?:[Ll](?:[Ii][Ss][Tt]|
[Ss][Uu][Bb])))|(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))
|[&=~:@/])+)(?:\?(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[
&=~:@/])+))?(?:(?:;[Uu][Ii][Dd][Vv][Aa][Ll][Ii][Dd][Ii][Tt][Yy]=(?:[1-
9]\d*)))?)|(?:(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[&=~
:@/])+)(?:(?:;[Uu][Ii][Dd][Vv][Aa][Ll][Ii][Dd][Ii][Tt][Yy]=(?:[1-9]\d*
)))?(?:/;[Uu][Ii][Dd]=(?:[1-9]\d*))(?:(?:/;[Ss][Ee][Cc][Tt][Ii][Oo][Nn
]=(?:(?:(?:[a-zA-Z\d$\-_.+!*'(),]|(?:%[a-fA-F\d]{2}))|[&=~:@/])+)))?))
)?)|(?:nfs:(?:(?://(?:(?:(?:(?:(?:[a-zA-Z\d](?:(?:[a-zA-Z\d]|-)*[a-zA-
Z\d])?)\.)*(?:[a-zA-Z](?:(?:[a-zA-Z\d]|-)*[a-zA-Z\d])?))|(?:(?:\d+)(?:
\.(?:\d+)){3}))(?::(?:\d+))?)(?:(?:/(?:(?:(?:(?:(?:[a-zA-Z\d\$\-_.!~*'
(),])|(?:%[a-fA-F\d]{2})|[:@&=+])*)(?:/(?:(?:(?:[a-zA-Z\d\$\-_.!~*'(),
])|(?:%[a-fA-F\d]{2})|[:@&=+])*))*)?)))?)|(?:/(?:(?:(?:(?:(?:[a-zA-Z\d
\$\-_.!~*'(),])|(?:%[a-fA-F\d]{2})|[:@&=+])*)(?:/(?:(?:(?:[a-zA-Z\d\$\
-_.!~*'(),])|(?:%[a-fA-F\d]{2})|[:@&=+])*))*)?))|(?:(?:(?:(?:(?:[a-zA-
Z\d\$\-_.!~*'(),])|(?:%[a-fA-F\d]{2})|[:@&=+])*)(?:/(?:(?:(?:[a-zA-Z\d
\$\-_.!~*'(),])|(?:%[a-fA-F\d]{2})|[:@&=+])*))*)?)))
>
{<a href = "$1">$1</a>}xg;
Abigail
--
sub f{sprintf'%c%s',$_[0],$_[1]}print f(74,f(117,f(115,f(116,f(32,f(97,
f(110,f(111,f(116,f(104,f(0x65,f(114,f(32,f(80,f(101,f(114,f(0x6c,f(32,
f(0x48,f(97,f(99,f(107,f(101,f(114,f(10,q ff)))))))))))))))))))))))))
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 27 Jul 1999 19:48:57 GMT
From: <vlad@doom.net>
Subject: Re: Don't want to make file that owner is "NOBODY"
Message-Id: <7nl2f9$6vb$3@news.servint.com>
If you're running the scripts from a shell where you are logged in, then the
data files your program creates will be owned by you.
If you are running the scripts through a web browser the data files will be owned
by whatever id the web server runs under (usually user:nobody and group:nogroup).
The only way around this that I know of is installing the suexec module for Apache
(if Apache is the web server you are using of course)
Check out http://www.apache.org/docs/suexec.html for more details on suexec
channeli <cybok@nobreak.com> wrote:
> My perl script make several data files.
> But the problems of my server is that never allow the file that owned by
> "NOBODY".
> I'm using
> umask(077);
> now.
> At the result, some files owned by the owner of script, some are "nobody".
> Any other solution is there?
> I'm really urgent...
--
-v
------------------------------
Date: 27 Jul 1999 18:30:00 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Getting Height and Width of GIF/JPEG in PERL?
Message-Id: <slrn7psg6s.2er.abigail@alexandra.delanet.com>
Tom Christiansen (tchrist@mox.perl.com) wrote on MMCLVI September
MCMXCIII in <URL:news:379dcfc0@cs.colorado.edu>:
'' [courtesy cc of this posting mailed to cited author]
''
'' In comp.lang.perl.misc,
'' "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.net> writes:
'' :Wayne Venables wrote:
'' :>
'' :> Does anyone have any code to retrieve the height and width of GIF
'' :> and JPEG files?
'' :
'' :I'd say this is a FAQ.
''
'' Can you imagine it going into the comp.lang.c FAQ?
Is it a FAQ there? While on the edge of being off-topic, it's certainly
a FAQ in this group. Furthermore, the FAQ discusses HTML topics as well
500 Server errors, which are about as far away from core perl as finding
height & width of images.
I'd write an entry for the FAQ on this topic, if I would ever use code
to find out the size of an image - however, I always know the size of
the image before I make it, so why should I want to find out afterwards?
But perhaps Philips wants to write an entry?
'' And don't get me started on the abomination known as perldoc. Just don't.
Then don't bring it up.
Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 28 Jul 1999 00:08:43 GMT
From: revjack <revjack@radix.net>
Subject: Re: Getting Height and Width of GIF/JPEG in PERL?
Message-Id: <7nlhmb$a5e$1@news1.Radix.Net>
Keywords: Hexapodia as the key insight
Abigail explains it all:
:I'd write an entry for the FAQ on this topic, if I would ever use code
:to find out the size of an image - however, I always know the size of
:the image before I make it, so why should I want to find out afterwards?
To find out the size of other people's images? I recently wrote a small
application that allows our intranet users to upload banner ads to our
websites. Determining the height and width of the uploaded image allows
the app to write out the proper HTML code to the target web page.
------------------------------
Date: 27 Jul 1999 18:36:18 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Getting Height and Width of GIF/JPEG in PERL?
Message-Id: <379e5082@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc,
abigail@delanet.com writes:
:'' And don't get me started on the abomination known as perldoc. Just don't.
:Then don't bring it up.
I didn't. Somebody else did.
--tom
--
USENET: N. A self-replicating phage engineered by the phone company to cause
computers to spend large amounts of their owners budget on modem charges.
------------------------------
Date: Wed, 28 Jul 1999 01:20:23 +0200
From: "Marco Cecconi" <sklivvz@tiscalinet.it>
Subject: Re: Help removing special characters from a string
Message-Id: <7nletg$edi$1@aquila.tiscalinet.it>
>for ($a = 0; $a <= $#userwords; $a++) {
> @userwords[$a] = substr(@userwords[$a], 6);
> $_ = @userwords[$a];
Mmmm I'd use
$userwords[$a] = substr($userwords[$a], 6);
$_ = $userwords[$a];
> s/+/ /g;
What about s/\+/ /g; ?
> @userwords[$a] = $_;
$userwords[$a] = $_;
> }
------------------------------
Date: 27 Jul 1999 19:37:13 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Help removing special characters from a string
Message-Id: <slrn7psk4s.2er.abigail@alexandra.delanet.com>
ryan7879@my-deja.com (ryan7879@my-deja.com) wrote on MMCLVI September
MCMXCIII in <URL:news:7nla8j$pos$1@nnrp1.deja.com>:
:: I'm new to Perl and I am having trouble removing
:: a "+" character from a string. The plus exists
:: because the string has it's value submitted from
:: one web page to another, therefor the blank
:: spaces are url encoded. The following works for
:: letters or combinations of letters, but fails on
:: the s/+/ /g; line when a plus sign is involved.
:: Does anyone know how to get around this?
Did you bother checking the manual? You should be able to find
at least 2 methods within 5 minutes.
::
:: Thanks.
::
:: for ($a = 0; $a <= $#userwords; $a++) {
:: @userwords[$a] = substr(@userwords[$a], 6);
You're assigning a scalar to a slice. Scary.
I guess you didn't use -w, did you?
:: $_ = @userwords[$a];
And now, you're assigning a slice to a scalar. Scary.
I guess you didn't use -w, did you?
:: s/+/ /g;
Now, isn't it silly to assign something to $_, just for the purpose
of using s///? Why not do it directly?
And, when translation single chars to single chars, you might consider
y/// instead.
:: @userwords[$a] = $_;
You're assigning a scalar to a slice. Scary.
I guess you didn't use -w, did you?
:: }
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Tue, 27 Jul 1999 17:56:47 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Help removing special characters from a string
Message-Id: <MPG.1207f51f489766d9989d5a@nntp.hpl.hp.com>
In article <7nletg$edi$1@aquila.tiscalinet.it> on Wed, 28 Jul 1999
01:20:23 +0200, Marco Cecconi <sklivvz@tiscalinet.it> says...
> >for ($a = 0; $a <= $#userwords; $a++) {
> > @userwords[$a] = substr(@userwords[$a], 6);
>
> > $_ = @userwords[$a];
>
> Mmmm I'd use
> $userwords[$a] = substr($userwords[$a], 6);
> $_ = $userwords[$a];
>
> > s/+/ /g;
> What about s/\+/ /g; ?
>
> > @userwords[$a] = $_;
>
>
> $userwords[$a] = $_;
>
> > }
What about
$userwords[$a] =~ tr/+/ /;
which is at least 10 times faster than the substitution, let alone all
the copying?
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 27 Jul 1999 19:24:20 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: How to use a module
Message-Id: <slrn7psjcn.2er.abigail@alexandra.delanet.com>
Yvonne Li (yli15@lucent.com) wrote on MMCLVI September MCMXCIII in
<URL:news:379DFDEC.730E9BB3@lucent.com>:
$$ Forgive me asking this stupid question. I am very new to perl and trying to
$$ write a program which will login to a gateway and telnet to another machine.
$$ expert told me to use module ::telnet to do this job, but how do I put it in
$$ code. I mean there is no doc on CPAN telling me how to use a module. Do I nee
$$ download the module first and then what?
Well... yeah. *boggle* I really wonder what alternatives you considered.
As for the next steps, you unpack the file, read the INSTALL or README
file on how to install it (most Modules require the standard steps:
perl Makefile.PL
make
make test
make install
).
After that, you read the manual of the module, and you're on your way!
As for general help on how to use modules, that's part of the standard
manual set. 'man perlmod'.
$$ Can any one give me an example? Is there any other way to do the relogin and
$$ telnet except using modules?
Of course, one could always type in the code of the module in your
program, but why should you? But if you wish to reimplement the telnet
protocol, start reading on how to do sockets, and on the telnet RFC.
I strongly suggest using the module.
Abigail
--
perl -we 'print q{print q{print q{print q{print q{print q{print q{print q{print
qq{Just Another Perl Hacker\n}}}}}}}}}' |\
perl -w | perl -w | perl -w | perl -w | perl -w | perl -w | perl -w | perl -w
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Wed, 28 Jul 1999 09:32:57 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: Korn Shell or Perl?
Message-Id: <MPG.1208ecb719470d8b989b91@news-server>
Michael Wang writes ..
>Please advise me how can I avoid awkwardness and at the same time
>avoid temporary variables. I appreciate your help. Thanks.
I think you might find most people are getting bored with you asking
things and then changing the specs AFTER the answers are provided .. I
know I get enough of that in my professional life to have a very low
tolerance for it in usenet
--
jason - remove all hyphens for email reply -
------------------------------
Date: Wed, 28 Jul 1999 01:05:51 +0200
From: "Marco Cecconi" <sklivvz@tiscalinet.it>
Subject: Re: Little Puzzle I can't solve . . .
Message-Id: <7nle29$d3l$1@aquila.tiscalinet.it>
>if ( $vin[0] != "") {
if ($I eq $you) {
$I=eval{ use "eq.instead.of" } != ""
}
got it? :)
Marco Cecconi
Inferentia S.p.A.
perl -e 'use Standard::Disclaimer;'
------------------------------
Date: 27 Jul 1999 19:34:28 GMT
From: <vlad@doom.net>
Subject: Re: paragraph breaks in text?
Message-Id: <7nl1k4$6vb$2@news.servint.com>
If you don't want to use <pre> tags then the most you can do is
display emails just as the user typed them, Just substitute
newlines with html <br>'s. Thats how I do it.
$mail =~ s/\n/<br>/g;
> I thought there might be some clever Perl trickery to pull the multiline
> text back into a format which essentially has one paragraph per line
> (somehow working out where the paragraph breaks are), but perhaps it hasn't
> been done yet...
--
-v
------------------------------
Date: Tue, 27 Jul 1999 17:01:26 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: paragraph breaks in text?
Message-Id: <MPG.1207e82b232fd7f4989d59@nntp.hpl.hp.com>
In article <7nl1k4$6vb$2@news.servint.com> on 27 Jul 1999 19:34:28 GMT,
vlad@doom.net <vlad@doom.net> says...
> If you don't want to use <pre> tags then the most you can do is
> display emails just as the user typed them, Just substitute
> newlines with html <br>'s. Thats how I do it.
>
> $mail =~ s/\n/<br>/g;
Have mercy on anyone who sees or stores the HTML source.
$mail =~ s/\n/<br>\n/g;
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
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 V9 Issue 276
*************************************
