[7857] in Perl-Users-Digest
Perl-Users Digest, Issue: 1482 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Dec 16 11:17:20 1997
Date: Tue, 16 Dec 97 08:00:42 -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 Tue, 16 Dec 1997 Volume: 8 Number: 1482
Today's topics:
Re: Best port to Win 95? <twolf@sampo.creighton.edu>
Re: CR/LF Text-File (Tad McClellan)
Re: Detect Java, JavaScript Enabled via Perl <dead@visitweb.com>
Re: failed exec() <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: failed exec() (Andrew M. Langmead)
Re: failed exec() (M.J.T. Guy)
Re: failed exec() (Honza Pazdziora)
Re: find and replace <reibert@mystech.com>
Re: getting the pid from a system call <adavid@netinfo.com.au>
Re: Help: How to get IP and full domain name of my host <twolf@sampo.creighton.edu>
Re: Highlight diff between documents <barnett@houston.Geco-Prakla.slb.com>
Re: Highlight diff between documents <frederic.corne@erli.fr>
Re: How do I send data to my perl script? (Honza Pazdziora)
Re: how to clear terminal screen (Gabor)
Re: how to clear terminal screen (Andrew M. Langmead)
Re: how to clear terminal screen <barnett@houston.Geco-Prakla.slb.com>
Re: How to get everything in between <pre>....</pre> ta (M.J.T. Guy)
Re: How to stop 'read' from waiting for ever in perl v5 (M.J.T. Guy)
Re: NEED: Fast, Fast string trim() <reibert@mystech.com>
Re: newbie = ? on executing OS/2 commands via system(), (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Newbie question. <qpkrogh@epk.ericsson.se>
Re: Newbie, very newbie <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: Pattern Matching .* <barnett@houston.Geco-Prakla.slb.com>
Re: Pattern Matching .* peter.edlund@capgemini.se
Re: perl http client via sockets <twolf@sampo.creighton.edu>
Re: Perl Installation on SUN Netra i (Clay Irving)
Re: Perl script for form processing (Honza Pazdziora)
Re: Perl url redirect <shawn@wwgv.com>
Re: Question about telnet.pl <twolf@sampo.creighton.edu>
Re: Really newbie question <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Re: Really newbie question peter.edlund@capgemini.se
Re: Really newbie question (Tad McClellan)
Re: recursive regex? <rets@meta3.com>
rindex ? <lecorre@magic.fr>
Re: rindex ? <ajohnson@gpu.srv.ualberta.ca>
Why does my suid program have /dev/fd/3 in $0 lee.gammell@feedME
WWW and Internet Books FS (Sax Therapy)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 16 Dec 1997 08:40:38 -0500
From: "Thomas Charron" <twolf@sampo.creighton.edu>
Subject: Re: Best port to Win 95?
Message-Id: <6760cm$9h22@biko.telecom.ups.com>
Well, now, that's a matter of opinion, I'd suppose.. I've used both,
and I guess the Native compile is the best solution for most. I've Noticed
that the Active port seems to generate alot of warning when using a -w
switch, as opposed to none in the Native port.. The native port supports
perl/tk extentions, the native doesn't.. On the other hand, perl2exe is
meant for Active's port..
dave wrote in message <3492fc11.7080162@news.one.net>...
>What is best port of Perl to Win 95?
>
>Why?
>
>How much disk space and memory does it require?
>
>
>Thanks,
>Dave
>
>
>~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>http://w3.one.net/~dlripber
>ten.eno@rebpirld
------------------------------
Date: Tue, 16 Dec 1997 08:42:56 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: CR/LF Text-File
Message-Id: <g14676.381.ln@localhost>
Remove xx (xxTony.Curtis@vcpc.univie.ac.at) wrote:
: Re: CR/LF Text-File, Tobias
: <udta@rzstud1.rz.uni-karlsruhe.de> said:
: Tobias> But the perl/skript runs on a LinuX-System. How can
: Tobias> i read strings from a text-file with cr/lf at the
: Tobias> end of each line on a LinuX-Plattform ???
: Do this to the input line
: s/\r$//;
: That will remove the CR (\r) if there's one at the end.
Or, better yet, when transfering the files, use FTP in ASCII mode and
it will convert the line endings for you.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 16 Dec 1997 15:13:43 +0000
From: CJ <dead@visitweb.com>
To: ywang@maingate.net
Subject: Re: Detect Java, JavaScript Enabled via Perl
Message-Id: <34969AA7.2EF1@visitweb.com>
One possibility is to use a URL redirection agent - I only know of
the one at http://visitweb.com.
ywang@maingate.net wrote:
>
> Hi,
>
> Could anyone tell me how to detect the user's brower is JavaScript/Java
> enabled via using Perl CGI program? And is there possible the enable
> those feature via a CGI program?
------------------------------
Date: Tue, 16 Dec 1997 06:30:57 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: failed exec()
Message-Id: <67639q$dt8@mtinsc04.worldnet.att.net>
Actually, probably. Some vendors are paranoid and won't let you run anything
at all from your browser. Some require you to get approval from a sysadmin
before you can run a script. This is really a question for your vendor
and/or a newsgroup about your particular server.
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
David Minsterman wrote in message <3496836E.A10D066C@mailbox.syr.edu>...
>I really need some advice!
>
>I wrote a simple perl script. I am attempting to use it to start a java
>program. The entire script works fine from the command line but fails
>when I try to start it from and HTML link.
>What I am using is this: exec "java $programname"
>
>where $programname is the java class file that I want to run. Are there
>any security restrictions on exec() imposed by a server when accessed
>over the web as opposed to from the command line?
>
>TIA
>Dave
>
>
------------------------------
Date: Tue, 16 Dec 1997 15:09:27 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: failed exec()
Message-Id: <ELAFFr.4I2@world.std.com>
David Minsterman <daminste@mailbox.syr.edu> writes:
>What I am using is this: exec "java $programname"
>where $programname is the java class file that I want to run. Are there
>any security restrictions on exec() imposed by a server when accessed
>over the web as opposed to from the command line?
If it is really the exec failing, the best way to find out would be to
say:
exec 'java', $programname or die "Error running $programname: $!\n";
and look for an error message wherever yor server throws the standard
diagnostic output.
If the error message is something like "no such file or directory"
start checking things like whether the PATH environment variable
_that_is_set_for_the_cgi_script_ has a path to the "java"
program. (Remember, your path is probably set by your login shell's
startup scripts, and your CGI script didn't log in.) Basically some of
the same issues that are outlined in <URL:http://language.perl.com/
CPAN/doc/FAQs/cgi/idiots-guide.html>
If the perl script isn't complaining about the exec(), then maybe the
java compiler is complaining about $programname. Again its probably
complaining on STDERR and you can find it whereever your server puts
it.
Perl does have security restrictions that it enables whenever perl is
called in a setuid script, (and can optionally be enabled in other
scripts. Using it in CGI scripts is a good idea since it runs under
another user.) but I'd assume you wouldn't be running with the -T
switch and not know it. (If you would like to, take a look at the
perlsec man page.)
--
Andrew Langmead
------------------------------
Date: 16 Dec 1997 15:47:59 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: failed exec()
Message-Id: <6767rf$9t1$1@lyra.csx.cam.ac.uk>
Not actually answering your question, since others have done that, but ...
David Minsterman <daminste@mailbox.syr.edu> wrote:
>What I am using is this: exec "java $programname"
That is dangerous, if the $programname is somehow user supplied.
Consider what happens if the $programname were '; rm -rf /'
(or corresponding for non-unix systems). Use the multi-argument form
of exec instead. It's also more efficient.
exec 'java', $programname or die "exec failed: $!"
Mike Guy
------------------------------
Date: Tue, 16 Dec 1997 14:07:24 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: failed exec()
Message-Id: <adelton.882281244@aisa.fi.muni.cz>
David Minsterman <daminste@mailbox.syr.edu> writes:
> I really need some advice!
>
> I wrote a simple perl script. I am attempting to use it to start a java
> program. The entire script works fine from the command line but fails
> when I try to start it from and HTML link.
> What I am using is this: exec "java $programname"
>
> where $programname is the java class file that I want to run. Are there
> any security restrictions on exec() imposed by a server when accessed
> over the web as opposed to from the command line?
None except those imposed by www server itself, such as different user
and group, different paths and environment, etc. Check the CGI related
links at
http://language.perl.com/faq/index.html
Hope this helps,
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: Tue, 16 Dec 1997 08:32:30 -0700
From: "Mark S. Reibert" <reibert@mystech.com>
Subject: Re: find and replace
Message-Id: <34969F0E.AEC9293@mystech.com>
Tad McClellan wrote:
> perl -p -i.bak -e 's/referenced word/explanation/g' *.html
>
> [ s/\.bak// if you are a brave sort of person ]
>
> I think mine is simpler ;-)
I appreciate your simplicity, but I understood the original post as wanting to know in which files a string appears as opposed to a
search-and-replace application. In that sense, my example was meant to be more tutorial than directly applicable as written! I wanted to show
a straightforward search approach that I believed would be easy to understand yet instructive. :-)
Adios,
Mark Reibert
-----------------------------
Mark S. Reibert, Ph.D.
Mystech Associates, Inc.
3233 East Brookwood Court
Phoenix, Arizona 85044
Tel: (602) 732-3752
Fax: (602) 706-5120
E-mail: reibert@mystech.com
-----------------------------
------------------------------
Date: Wed, 17 Dec 1997 01:16:28 +1100
From: Anthony David <adavid@netinfo.com.au>
Subject: Re: getting the pid from a system call
Message-Id: <34968D3C.CD70FB03@netinfo.com.au>
David Leach wrote:
> Hi there,
>
> I'm fairly new to perl - and I'm having some trouble working out how I
> should go about grabbing the pid of a program I've (exec/system) called.
>
> The program that the script is calling puts itself into the background
> and continues running.
>
> I want to keep monitoring the pid of that program to make sure it is
> still running.
If you are still the parent, there should be no need to look at the pid
>
>
> Any suggestions as to how I might do this?
> (The program is ssh for anyone who's interested, I'm running it with -f
> )
system "ssh", "-f", $host ....; # I assume this is the syntax for ssh...my
$ssh_status = 1;
while ($ssh_status){
sleep 30; #choose your wait time
$ssh_status = grep(/ssh/, `ps`);
}
> Thanks in advance for any help..
You're welcome
PS: Please forgive me two versions of this post appear. I'm not sure if my
lynx
post worked.
--
Anthony David | Opinions expressed ARE
Anthony David & Associates | those of my employer
------------------------------
Date: Tue, 16 Dec 1997 08:37:04 -0500
From: "Thomas Charron" <twolf@sampo.creighton.edu>
Subject: Re: Help: How to get IP and full domain name of my host?
Message-Id: <676064$9h21@biko.telecom.ups.com>
Well, there are several different ways that one could get the info.. Try
looking at the Net::Hostname package, should be able to point you in the
right direction, and also provide several different ways to accomplish it..
Alex Dong Li wrote in message <670vb9$5k5$1@titan.globalserve.net>...
>Hello, expert,
>
>Could anyone tell me if there is a function to get IP and full domain name
>of my host?
>Functions gethostbyaddr and gethostbyname reply on one of IP and full
domain
>name. Unix command "hostname" only gives the sub domain name.
>
>Thanks for help in advance!
>
>Alex Dong Li
------------------------------
Date: Tue, 16 Dec 1997 07:37:34 -0600
From: Dave Barnett <barnett@houston.Geco-Prakla.slb.com>
Subject: Re: Highlight diff between documents
Message-Id: <3496841B.8FF18DCA@houston.Geco-Prakla.slb.com>
Guo Jianyu wrote:
> Hi,
> I'm just wondering if there's any software that can compare two
> documents(e.g HTML files) and highlight the differences. If there is,
> where can I find it? Can anyone enlighten me? Thanks a lot.
>
> --
You didn't mention what os you're running, and I don't see much
relevance to Perl here, but I'll answer anyway.
A program called Xemacs has an e-diff feature that is pretty good for
highlighting differences between files. I know it's available for
Unix. I'm not sure about anything else.
Have a look at http://www.xemacs.org
If that doesn't help, try a newsgroup devoted to (e.g. HTML files) text
editors, or similar specialized thingies.
HTH.
Dave
--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
------------------------------------------------------------------------
* Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com *
* DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com *
------------------------------------------------------------------------
------------------------------
Date: 16 Dec 1997 14:14:44 +0100
From: Frederic Corne <frederic.corne@erli.fr>
Subject: Re: Highlight diff between documents
Message-Id: <u7m95o2ez.fsf@erli.fr>
Guo Jianyu <guojiany@iscs.nus.edu.sg> writes:
> Hi,
> I'm just wondering if there's any software that can compare two
> documents(e.g HTML files) and highlight the differences. If there is,
> where can I find it? Can anyone enlighten me? Thanks a lot.
>
> --
emacs, of course !
--
--- Frederic Corne --- ERLI --- frederic.corne@erli.fr ---
------------------------------
Date: Tue, 16 Dec 1997 08:54:48 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: How do I send data to my perl script?
Message-Id: <adelton.882262488@aisa.fi.muni.cz>
"Andrei Ignat" <t-n-g@algonet.se> writes:
> This a quite stupi question but I can't figure it out, what do I write in
> the address bar for IE or NN or an <A> tag? I found something like this:
>
> <a
> href=3D"http://cgi.algonet.se/htbin/cgiwrap/t-n-g/view_card.pl&CardNumber=1"
> >Web</a>
The basic question is: is the problem specific to Perl? I mean, if you
create a shell script, will the error message be the same. If yes (and
yes), then it's not a question for c.l.p.misc but for cgi/http/html
related newsgroups and sites around the web.
Hope this helps,
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: 16 Dec 1997 14:37:08 GMT
From: gabor@vinyl.quickweb.com (Gabor)
Subject: Re: how to clear terminal screen
Message-Id: <slrn69d44j.fm7.gabor@vinyl.quickweb.com>
In article <34962A8B.68DA5099@laker.net>, Russ Brewer wrote:
- I am just beginning to study perl. I want clear the screen, something a
- shell script does with the "clear" command. What is the perl command to
- simply clear the screen?
- In several books I do not see a reference to a perl "clear" command in
- the indexes. Obviously it is called something else.
-
- Russ Brewer
- Perl Newbie
Clearing the screen is system dependent. In Unix you could use
system("clear");
gabor.
--
double value; /* or your money back! */
short changed; /* so triple your money back! */
-- Larry Wall in cons.c from the perl source code
------------------------------
Date: Tue, 16 Dec 1997 14:46:01 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: how to clear terminal screen
Message-Id: <ELAECp.B8H@world.std.com>
Russ Brewer <russ@laker.net> writes:
>I am just beginning to study perl. I want clear the screen, something a
>shell script does with the "clear" command. What is the perl command to
>simply clear the screen?
>In several books I do not see a reference to a perl "clear" command in
>the indexes. Obviously it is called something else.
One simple way, portable to all unix and unixlike systems would be to
just say:
system('clear');
If shelling of another program bothers you, you could either minimize
your aggravation by capturing the output of clear and printing it when
needed.
$clear = `clear`;
print $clear;
(and I guess that could possible me more efficient if you are clearing
the screen often, but I can't imagine a program where clearing the
screen this way would cause significant overhead.)
You could also use the Term::Cap module that would enable you to use
all of unix's terminal handling abilities.
<URL:http://reference.perl.com/module.cgi?Term::Cap>
--
Andrew Langmead
------------------------------
Date: Tue, 16 Dec 1997 08:23:50 -0600
From: Dave Barnett <barnett@houston.Geco-Prakla.slb.com>
Subject: Re: how to clear terminal screen
Message-Id: <34968EF2.924E8F2D@houston.Geco-Prakla.slb.com>
--------------460E6D3BDAF469CDE67F9118
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Russ Brewer wrote:
> I am just beginning to study perl. I want clear the screen, something a
> shell script does with the "clear" command. What is the perl command to
> simply clear the screen?
> In several books I do not see a reference to a perl "clear" command in
AFAIK, there isn't one, but I could be wrong. :-)
Why re-invent the wheel? Easy enough to do:
system('clear') == 0 or die "Cannot clear display!: $!\n";
Issues a system call, executing the "clear" command, and returns the exit
status. Aborts script on error.
HTH.
> the indexes. Obviously it is called something else.
>
> Russ Brewer
> Perl Newbie
Dave
--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
------------------------------------------------------------------------
* Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com *
* DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com *
* Schlumberger Geco-Prakla (281) 596-1434 (Office Number) *
* 1325 S. Dairy Ashford (281) 596-1807 (Fax) *
* Houston, TX 77077 *
------------------------------------------------------------------------
--------------460E6D3BDAF469CDE67F9118
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<HTML>
Russ Brewer wrote:
<BLOCKQUOTE TYPE=CITE>I am just beginning to study perl. I want clear the
screen, something a
<BR>shell script does with the "clear" command. What is the perl
command to
<BR>simply clear the screen?
<BR>In several books I do not see a reference to a perl "clear" command
in</BLOCKQUOTE>
AFAIK, there isn't one, but I could be wrong. :-)
<P>Why re-invent the wheel? Easy enough to do:
<BR>system('clear') == 0 or die "Cannot clear display!: $!\n";
<P>Issues a system call, executing the "clear" command, and returns the
exit status. Aborts script on error.
<P>HTH.
<BLOCKQUOTE TYPE=CITE>
<P>the indexes. Obviously it is called something else.
<P>Russ Brewer
<BR>Perl Newbie</BLOCKQUOTE>
Dave
<PRE>--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
------------------------------------------------------------------------
* Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com *
* DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com *
* Schlumberger Geco-Prakla (281) 596-1434 (Office Number) *
* 1325 S. Dairy Ashford (281) 596-1807 (Fax) *
* Houston, TX 77077 *
------------------------------------------------------------------------</PRE>
</HTML>
--------------460E6D3BDAF469CDE67F9118--
------------------------------
Date: 16 Dec 1997 15:16:24 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: How to get everything in between <pre>....</pre> tags in html
Message-Id: <676608$8t3$1@lyra.csx.cam.ac.uk>
In article <hl0176.cs.ln@localhost>, Tad McClellan <tadmc@metronet.com> wrote:
>That is an inefficient way to get an entire file into a string.
>
>I would stick with the conventional idiom:
>
>undef $/;
>$lines = <FILENAME>; # slurp
Or better, to avoid wrecking the input in the rest of your program:
{ local $/; $lines = <FILENAME> };
Mike Guy
------------------------------
Date: 16 Dec 1997 15:39:53 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: How to stop 'read' from waiting for ever in perl v5.004
Message-Id: <6767c9$9kr$1@lyra.csx.cam.ac.uk>
Dafydd Richards <dafydd@gwe.co.uk> wrote:
>
>Is there anyway in perl 5.004 of breaking the wait on 'read' after a set
>time???
This entry in perlfaq8 looks relevant:
How do I timeout a slow event?
Use the alarm() function, probably in conjunction with a
signal handler, as documented the section on Signals in the
perlipc manpage and chapter 6 of the Camel. You may instead
use the more flexible Sys::AlarmCall module available from
CPAN.
Alternatively, use the 4 argument select() (or IO::Select) to wait
for input, then use a non-blocking sysread.
Mike Guy
------------------------------
Date: Tue, 16 Dec 1997 08:44:05 -0700
From: "Mark S. Reibert" <reibert@mystech.com>
Subject: Re: NEED: Fast, Fast string trim()
Message-Id: <3496A1C5.FBE27355@mystech.com>
Aaron Harsh wrote:
> Someone else pointed out the one-liner is slowed down by the nongreedy
> quantifier. Here's a one-liner that's 4 times faster on Matthew's test (but
> slower on smaller strings), and keeps the backreference:
>
> $string =~ s/^\s*(|.*\S)?\s*$/$1/;
>
> This looks even more cryptic than the original one-liner, so Mark should be
> happy :-)
I like it! This is consistent with the minimal-match slowness idea, since you
are using a maximal match here.
-----------------------------
Mark S. Reibert, Ph.D.
Mystech Associates, Inc.
3233 East Brookwood Court
Phoenix, Arizona 85044
Tel: (602) 732-3752
Fax: (602) 706-5120
E-mail: reibert@mystech.com
-----------------------------
------------------------------
Date: Tue, 16 Dec 97 10:22:05 -0500
From: bsa@void.apk.net (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Subject: Re: newbie = ? on executing OS/2 commands via system(), ++regexp
Message-Id: <34969d2e$2$ofn$mr2ice@speaker>
In <3495E538.D06BB371@cls.e-mail.com>, on 12/15/97 at 08:19 PM,
Carl Lucio Marino <cl_marino@cls.e-mail.com> said:
+-----
| I'm relatively new to Perl and I've run into to some problems, er uh,
| opportunities. I want to execute some OS/2 commands stored in a file, form
| my perl program. No problem, I'll use system().
+--->8
Had you read the README, you'd know that system() uses sh.exe, not cmd.exe.
Either reference environment variables as $envvar instead of %envvar% or code
your system as system('cmd', '/c', ...).
--
use 5.004;sub AUTOLOAD{print$_{$_.++$x{$_}}}sub new{my%x;%_=map{++$a%2?$_.++$x{
$_}:$_}split(//,pack('N*',unpack('w*',unpack('u*','M@H*HP\'2"@\C`88+SE/!EA(F!'.
"A'6\$LZV0+(3;C9QRA9NAPG2&D\\G(88:KL=A0\n4AN.5W\"\"&\\[W>;H>3S>0\@A\\N\@PB\$`")
)));bless{}}$b=(new main);map{$b->_}split(//,' Brandon S. Allbery KF8NH') # :-)
------------------------------
Date: Tue, 16 Dec 1997 16:35:18 +0100
From: Roger Hansson <qpkrogh@epk.ericsson.se>
Subject: Newbie question.
Message-Id: <34969FB5.47C90A1E@epk.ericsson.se>
My question is as follows:
Can I use include files in Perl , like I use include files in C?
I have a couple of scripts that use the same subroutines/functions, and
I want to have only one version of each subrutine/function.
/Roger Hansson
------------------------------
Date: Tue, 16 Dec 1997 06:17:33 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Newbie, very newbie
Message-Id: <6762go$cd8@mtinsc04.worldnet.att.net>
Sergio Rodrigues Giraldo wrote in message
<674i99$q85$1@puma.unisys.com.br>...
>I just downloaded Perl-Win32 from Activeware and I don't know how to test a
>simple Perl script !
That's OK. We were all new once.
>I got a script that just print 'HelloWorld' and I don't know how to insert
>into my homepage.
>The first line in script is #!/usr/bin/perl and I think this is the place
>for Perl.Exe. What shoul I put here ?
You should put
#!/usr/bin/perl -w
to get into the habit of seeing warning messages about mistakes and bad
programming practices (in my case anyway). Win32 doesn't have an equivalent
of #! that you can use to specify what program should be used to run a
script, so Perl-Win32 just ignores that part of the line and looks for any
flags that come afterward. This, by the way, is a Frequently Asked Question,
and you'll find a lot of the answers you need in the two lists of FAQs at
http://www.perl.com and http://www.activestate.com/support/faqs.
>Further, how i declare the script ? Should I compile it ?
>Thanks ...
You don't need to compile the script. What you need to do is find your
provider's instructions on how to add scripts to your homepage. For
instance, my provider says I should put the script in a /cgi-bin directory
underneath my public-web directory, set certain permissions on it so the
world can run it, and include a link to the script something like
<!--#include virtual="helloworld.cgi"-->
but that's really more of a CGI question or a provider-specific question
than it is a Perl question.
My advice? Read the FAQs, play around with Perl, kick the tires, take it for
a spin to see what it can do. And have fun.
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
------------------------------
Date: Tue, 16 Dec 1997 07:51:45 -0600
From: Dave Barnett <barnett@houston.Geco-Prakla.slb.com>
Subject: Re: Pattern Matching .*
Message-Id: <3496876F.1F6E5866@houston.Geco-Prakla.slb.com>
Ed wrote:
> Hello,
>
> In the 'Teach yourself Perl' book, the chapter on Pattern Matching
Not familiar with that book, but it should have it in the same section,
one would hope. :-)
> states that the special character .* matches any string (except newline
> characters). However it also mentions that this combination tries to
> match as much as possible
>
> eg. if the string *banana* is searched using the pattern /b.*a/ ,
> *banana* is matched and not *ba* or *bana* .
You should have a look at your book for the non-greedy operator (?). It
will keep Perl from matching as much as possible, and cause it to match
only until first occurrence.
Try the following script:
#!/usr/local/bin/perl -w
#
$b = $a = "banana";
$a =~ s/b.*?a//g;
print "\$& is: $&\n";
$b =~ s/b.*?a.*?a//g;
print "\$& is: $&\n";
__END__
You should see the results:
$& is: ba
$& is: bana
HTH
Dave
P.S. $& is the special scalar that holds what was matched.
--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
------------------------------------------------------------------------
* Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com *
* DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com *
------------------------------------------------------------------------
------------------------------
Date: 16 Dec 1997 14:27:15 GMT
From: peter.edlund@capgemini.se
Subject: Re: Pattern Matching .*
Message-Id: <676343$nu3$2@news.capgemini.se>
>eg. if the string *banana* is searched using the pattern /b.*a/ ,
>*banana* is matched and not *ba* or *bana* .
Pattern matching is normally 'greedy' just as you've put it above.
If you instead want it to match on the first occurence the magic charcter is a '?' after the quantifier (+,* etc)
then it'll match 'non-greedily'
//peter.
--
-------------------------
Peter Edlund
UNIX development engineer
Cap Gemini
peter.edlund@capgemini.se
------------------------------
Date: Tue, 16 Dec 1997 09:06:20 -0500
From: "Thomas Charron" <twolf@sampo.creighton.edu>
Subject: Re: perl http client via sockets
Message-Id: <6761su$9h24@biko.telecom.ups.com>
I believe there is a Net::Http module in newer version of Perl. If you have
an older release of perl5, check of CPAN mirrors and pick up the module..
mikane@shell3.ba.best.com wrote in message
<66uhhv$5p5$1@nntp1.ba.best.com>...
>I want to write a perl script that will get an HTML
>page off a server on the Internet using http.
>
>I assume the way to go about it is to go the socket
>route. My perl 5 book is a bit skimpy on this subject.
>
>Can anyone suggest a reference?
>
>
>Thanks
>
>Mike
>
------------------------------
Date: 16 Dec 1997 09:38:31 -0500
From: clay@panix.com (Clay Irving)
Subject: Re: Perl Installation on SUN Netra i
Message-Id: <6763p7$6ko@panix.com>
In <3495e022.5380911@gateway> ymisdn@pc.jaring.my (Y M Tan) writes:
>Can someone kindly enlight me on installing Perl on Sun Netra i
>machine running Solaris 2.5.1?
>I was told that I have to install GNU C/C++ compiler and get the Perl
>source for compilation. However, I am quite at loss at the 1st step.
If you don't want to/can't build Perl, you can get the Perl binaries in
Solaris package format at:
http://reference.perl.com/query.cgi?Solaris
--
Clay Irving <clay@panix.com> I think, therefore I am. I think?
http://www.panix.com/~clay/
------------------------------
Date: Tue, 16 Dec 1997 13:59:51 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: Perl script for form processing
Message-Id: <adelton.882280791@aisa.fi.muni.cz>
Dan <dan@webhse.com> writes:
> I am looking for a perl script to send the filled out form from a
> website to an appendable comma delimited text file.
use CGI;
Read the values using param method.
Open the file with open.
Test the return code ($!).
Print using print.
Close the file.
Check the documentation at http://language.perl.com/faq/index.html.
Hope this helps.
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: Tue, 16 Dec 1997 09:43:47 -0600
From: Shawn Tolivar <shawn@wwgv.com>
Subject: Re: Perl url redirect
Message-Id: <3496A1B2.9C86A2A1@wwgv.com>
Here is the revised post in plain text for those out there that can't read multi-part
mime.
I have a script that redirects a url specified from a drop down menu to the browser. This
works great, but what I need it to do is just a little more complicated. I have options
such as this is the drop down menu:
<OPTION value="http://www.ldsinc.com/_scripts/foods/testarray.asp">Option
<OPTION
value="http://www.ldsinc.com/_scripts/foods/testarray.asp?selection=CA&map=states">Option1
<OPTION
value="http://www.ldsinc.com/_scripts/foods/testarray.asp?selection1=FL&map1=states">Option2
I need to be able to select multiple options from this menu and have them appended to the
redirect according to what options were selected. By default, the value
http://www.ldsinc.com/_scripts/foods/testarray.asp will be redirected no matter what is
selected. If say Option1 is selected but nothing else then the redirect would look like
http://www.ldsinc.com/_scripts/foods/testarray.asp?selection=CA&map=states ,
but if both Option1 and Option2 where selected then the redirect would look like this:
http://www.ldsinc.com/_scripts/foods/testarray.asp?selection=CA&map=states&selection1=FL&map1=states
and so on for as many options are selected. I am not quite sure exactly how to go about
doing this. Attached is the source code that I have tried to work with. Thank you.
Shawn Tolivar
____________________________________________________________________________
Here is the script that I am working with:
#!/usr/local/bin/perl
#
# selection.pl -- A simple script to issue a redirect based on
# a form selection.
#
# Written by Collin Forbes in May, 1996
# Revised (1.01) in August, 1996
#
# The script takes the value of a field called "URL" from the form and
# issues a redirection response to that value. It had better be a valid
# URL or else the browser will report an error.
#
# Unfortunately, browsers from Netscape and Microsoft will work using
# relative URLs, but the HTTP specification says it needs to be an
# absolute URL. If you use relative URLs, and someone says it didn't
# work, don't say you didn't know!
#
# Ideally you would use this script with a form containing either the
# <select> element or radio buttons. Use the GET method.
main: {
@pairs = split(/&/, $ENV{'QUERY_STRING'} ); # GET Method
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$FORM{$name} = $value;
}
$location = $FORM{'URL'}; # Use the field named "URL".
print "Location: $location\n\n"; # Voila!
}
------------------------------
Date: Tue, 16 Dec 1997 08:59:34 -0500
From: "Thomas Charron" <twolf@sampo.creighton.edu>
Subject: Re: Question about telnet.pl
Message-Id: <6761g8$9h23@biko.telecom.ups.com>
Ya know, I had the same problem with that example a while back, and it's
gonna kick you in the 'ole noggin' when you see it.. Most telnet Daemon's
send this type of this:
Login:
Now.. If you really, really look at it, there's no carriage return after
the Login: Prompt, but you're trying to use <S> to read, which waits for
imput untill a char return.. Chances are, it's working fine, it's just not
getting to the point of returning anything quite yet.. Instead of this:
while( $b=<STDIN> ) {
print S "$b\n";
$a=<S>;print "$a";
}
try using this:
$numbytes = read(S, $crapola, 1024);
if($numbytes > 0) {
print $crapola;
}
to read input from the port. One could also use some sort of getc for
STDIN. The problem with your approach is it relies on carriage returns..
Basically it needs to do something simular to this:
<Check for input from remote>
<If input from remote, print it>
<Check for Input from STDIN>
<If Data in STDIN, send to remote>
<repeat as neccesary>
Your doing this:
<Read 1 Line to Carriage return>
<Print Line>
<Wait for 1 Full line of text from STDIN>
<Send It, Wait for One Full Line from Remote>
<Repeat as neccesary>
But, the remote may not be sending linefeeds/carriage returns for the <>'s
to complete.. Get what I mean?
janghada wrote in message <66rf4f$7ca$2@news2.hitel.net>...
>I found this sample program(telnet.pl) to connect telnet server or any
>tcp server. But when I try to connect to telnet server, it seems like hang.
>No answer, but connect is ok. when I try to connect ftp server, there is
>a message from ftp server. Port 80 (http) is also Ok. Only telnet port
remains silent. Any problem in thiis source? Or any other consideration
needed for
>Telnnet Server? I really appreciate for your comments.
>
>--------------------------------------------------------------------------
>
>#tcp-client
>( $them, $port ) = @ARGV;
>
>$port = 23 unless $port;
>$them = 'localhost' unless $them;
>$AF_INET = 2;
>$SOCK_STREAM = 1;
>
>$SIG{'INT'} = 'dokill';
>sub dokill {
> kill 9,$child if $child;
>}
>
>$sockaddr = 'S n a4 x8';
>
>#chop($hostname = `hostname`);
>($name,$aliases,$proto) = getprotobyname('tcp');
>($name,$aliases,$port) = getservbyname($port,'tcp')
> unless $port =~ /^\d+$/;;
>($name,$aliases,$type,$len,$thisaddr) =
> gethostbyname($hostname);
>($name,$aliases,$type,$len,$thataddr) = gethostbyname($them);
>
>$this = pack($sockaddr, $AF_INET, 0, $thisaddr);
>$that = pack($sockaddr, $AF_INET, $port, $thataddr);
>
>if (socket(S, $AF_INET, $SOCK_STREAM, $proto)) {
> print "socket ok\n";
>}
>else {
> die $!;
>}
>
>if (bind(S, $this)) {
> print "bind ok\n";
>}
>else {
> die $!;
>}
>
>if (connect(S,$that)) {
> print "connect ok\n";
>}
>else {
> die $!;
>}
>
>select(S); $| = 1; select(STDOUT);
print "$a";
>}>$a=<S>;print "$a";
>while( $b=<STDIN> ) {
>print S "$b\n";
>$a=<S>;
>exit 1 ;
>--------------------------------------------------------------------------
>Thanks in advance.
>
------------------------------
Date: Tue, 16 Dec 1997 06:28:09 -0800
From: "Creede Lambard" <$_=qq!fearless\@NOSPAMio.com!;y/A-Z//d;print>
Subject: Re: Really newbie question
Message-Id: <67634j$dhj@mtinsc04.worldnet.att.net>
Unfortunately this is more of a CGI or vendor-specific question than it is a
Perl question. About the best I can tell you is to follow your provider's
instructions on how to implement CGI scripts carefully, including what
permissions to set, where to place it and what to call it. (My first script
didn't work at all until I renamed it from whatever.pl to whatever.cgi)
Good luck!
--- Creede Lambard
Minister of Irregular Expressions
Programming Republic of Perl
Moshe Dorner wrote in message <349683AE.8A4842E4@netvision.net.il>...
>To the group,
>
> I just started fooling around with CGIs in perl and I wanteed to
>know how do I call a script from my HTML file ?
>
> I have a simple counter script I wrote the works fine but when I try
>to integrate it with my html it doesn't work. Any ideas ?
>
>
------------------------------
Date: 16 Dec 1997 14:17:17 GMT
From: peter.edlund@capgemini.se
Subject: Re: Really newbie question
Message-Id: <6762hd$nu3$1@news.capgemini.se>
> I just started fooling around with CGIs in perl and I wanteed to
>know how do I call a script from my HTML file ?
This question eventually belongs to comp.www.authoring.cgi.
but shortly: you need to turn on server side includes (SSI) on your web server and then put something like <!--#exec cgi="/my/cgi/dir/myscript.pl"--> in your HTML page.
//peter.
--
-------------------------
Peter Edlund
UNIX development engineer
Cap Gemini
peter.edlund@capgemini.se
------------------------------
Date: Tue, 16 Dec 1997 08:28:02 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Really newbie question
Message-Id: <i53676.q61.ln@localhost>
Moshe Dorner (moe1@netvision.net.il) wrote:
: I just started fooling around with CGIs in perl and I wanteed to
: know how do I call a script from my HTML file ?
You would do this the same way regardless of what programming language
you choose to use, so it is not appropriate to ask it in a
language-specific newsgroup such as c.l.p.m
Asking your question in the right place will go a long way to getting
a correct answer (or even any answer at all).
I bet someone in the
comp.infosystems.www.authoring.cgi
newsgroup could help you with that question.
: I have a simple counter script I wrote the works fine but when I try
: to integrate it with my html it doesn't work. Any ideas ?
One idea might be to see what the Perl FAQ (part 9) says about CGI:
-----------------------------
=head2 My CGI script runs from the command line but not the browser. Can you help me fix it?
Sure, but you probably can't afford our contracting rates :-)
Seriously, if you can demonstrate that you've read the following FAQs
and that your problem isn't something simple that can be easily
answered, you'll probably receive a courteous and useful reply to your
question if you post it on comp.infosystems.www.authoring.cgi (if it's
something to do with HTTP, HTML, or the CGI protocols). Questions that
appear to be Perl questions but are really CGI ones that are posted to
comp.lang.perl.misc may not be so well received.
The useful FAQs are:
http://www.perl.com/perl/faq/idiots-guide.html
http://www3.pair.com/webthing/docs/cgi/faqs/cgifaq.shtml
http://www.perl.com/perl/faq/perl-cgi-faq.html
http://www-genome.wi.mit.edu/WWW/faqs/www-security-faq.html
http://www.boutell.com/faq/
-----------------------------
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 16 Dec 1997 09:31:54 -0600
From: Ken Holm <rets@meta3.com>
Subject: Re: recursive regex?
Message-Id: <34969EEA.31DF@meta3.com>
Lars Gregersen wrote:
>
> [posted and mailed]
>
> On 11 Dec 1997 02:03:10 GMT, coleman@library.ucsf.edu (Gregory
> Coleman) wrote:
>
> >Basically, I just want to go through a file system, and look at each level of directories and scan for something. For example, say I have user's home directories, and I am getting ready to change the path to perl. I want to know who all has "#!/usr/local/bin/perl" so that I might later change it.
Following is a sub that goes starts at a directory and grabs everything
and returns it in a hash:
get_files($dir, \%Flag);
@List = keys %Flag;
...
###############
sub get_files {
my ($dir, $Flag) = @_;
chdir $dir || die "[Z][$!][$dir]\n";
my $pwd = $dir;
my @ls = `ls -1`;
chomp @ls;
foreach $file (@ls) {
if (-d $file) {
$dir .= "/$file";
$$Flag{$dir} = 1;
get_files($dir, $Flag);
chdir $pwd || die "[A][$!][$pwd]\n";
$dir = $pwd;
} else {
$file = $dir . "/$file";
$$Flag{$file} = 1;
}
}
}
This does not solve your problem directly. Perhaps it provides a tool
to help out. I do use this and would appreciate comments on how to
better it.
-K
--
Kennneth A Holm | META 3 - Webmaster |webmaster@meta3.com
PO Box 1508 |----------------------------------|(601)948.3399 x 227
Jackson, MS 39215|PGP Key finger webmaster@meta3.com|(601)948.5999 (fax)
This article was posted from <A HREF="http://www.slurp.net/">Slurp Net</A>.
------------------------------
Date: Tue, 16 Dec 1997 16:01:05 +0100
From: "LE CORRE" <lecorre@magic.fr>
Subject: rindex ?
Message-Id: <67650t$f05$1@paris.magic.fr>
Do you know what rindex mean ?? Thanks
lecorre@magic.fr
------------------------------
Date: Tue, 16 Dec 1997 09:28:34 -0600
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: rindex ?
Message-Id: <34969E22.7AEAB9B2@gpu.srv.ualberta.ca>
LE CORRE wrote:
>
> Do you know what rindex mean ?? Thanks
> lecorre@magic.fr
I think 'rindex' is that white fibrous substance in between
the rind of an orange and the inner fruit...but perldoc -f will
let us know if it has an interesting functional meaning in
Perl as well:
[danger:ajohnson:~]$ perldoc -f rindex
=item rindex STR,SUBSTR,POSITION
=item rindex STR,SUBSTR
Works just like index except that it returns the position of the LAST
occurrence of SUBSTR in STR. If POSITION is specified, returns the
last occurrence at or before that position.
---
yup...means something different in Perl.
regards
andrew
------------------------------
Date: 16 Dec 97 12:38:49 GMT
From: lee.gammell@feedME
Subject: Why does my suid program have /dev/fd/3 in $0
Message-Id: <34967659.0@lightning.ica.net>
Hi all,
I have a suid/sgid script called dbkill.pl, however when i try and print out $0 in a USAGE clause it prints as "/dev/fd/3" not "dbkill.pl". I know this is because it is a suid; is there some other way to get the real script name ?
Many thanks,
Lee Gammell
DBA/UNIX systems Administrator.
------------------------------------------------------------------
Hungry for NEWSGROUPS??? USE feedME.ORG
Read and Post to 30,000 groups through feedME.ORG
FREE FREE FREE http://www.feedME.ORG FREE FREE FREE
------------------------------------------------------------------
------------------------------
Date: 16 Dec 1997 14:45:17 GMT
From: saxmania@ripco.com (Sax Therapy)
Subject: WWW and Internet Books FS
Message-Id: <67645t$3o5$3@gail.ripco.com>
Title
Author Publisher Year pages price
I N T E R N E T A N D W W W
Internet Programming
Kris Jamsa & Ken Cope Jamsa Press 1995 588pp w/disk 12.00
write programs that access the Internet from Windows
The Internet Business Book
J & M Ellsworth Wiley 1994 376pp 4.00
The Internet Unleashed
Sams.net 1995 1388pp 10.00
Publish It On The Web {Mac Version}
Bryan Pfaffenberger AP Professional 1996 436pp with CD-ROM 10.00
HTML Publishing on the Internet for Macintosh
Heslop & Holzgang Vantana Press 1995 540pp with CD-ROM 12.00
Teach Yourself More Web Publishing with HTML in a week
Laura Lemay Sams Pub. 1st edition 1995 452pp 4.00
Spinning The Web-A guide to serving information on the WWW
Yuval Fisher Springer 1996 538pp 10.00
60 Minute Guide to CGI Programming with Perl 5
Robert Farrell IDG Books 1996 272pp 7.00
U N I X
Rescued by Unix
Augie Hansen Jamsa Press 1994 252pp 10.00
Voodoo UNIX:Mastery Tips & Masterful Tricks
Russell & Crawford Ventana Press 1994 300pp 10.00
UNIX in a Nutshell:desktop reference for System V & Solaris 2.0
Daniel Gilly & staff O'Reilly 1992 460+pp 10.00
SCO UNIX in a Nutshell:desktop reference for SCO UNIX & Open Desktop
Ellie Cutler & staff O'Reilly 1994 568pp 10.00
SCO UNIX Operating System User's Guide 340pp 1992 5.00
Learning the Korn Shell
Bill Rosenblatt O'Reilly 1994 344pp 10.00
Special Edition - Using LINUX
Que publishing 1995 870pp with CD-ROM contains Linux 32-bit OS 15.00
LINUX Developer's Resource CD-ROM
InfoMagic 1994 3-CD set {30 page quickstart guide missing}
documentation available online.....12.00
The Waite Groups's UNIX System V Primer 2nd edition
Waite, Martin, Prata Sams Pub. 1992 566pp 8.00
O T H E R M I S C
OS/2 Warp Unleashed DeluxeEdition
Moskowitz, Kerr, Sams Pub. 3rd ed. 1995 1206pp with CD-ROM 15.00
Instant Delphi Programming
Dave Jewell Wrox Press 1995 450pp with Disk 10.00
Exploring Expect-A Tcl-based Toolkit for Automating Interactive Programs
Don Libes O'Reilly&Assoc. 1995 580pp 10.00
Perl By Example
Ellie Quigley Prentice-Hall PTR 1995 360pp $10
J A V A
JAVA Programming Language Handbook
Friedel & Potts Corilios Group 1996 416pp 12.00
Core Java (2nd edition)
Cornell & Horstmann Sunsoft Press 1997 768pp w/CD-ROM 12.00
Graphic Java - Mastering the AWT
Geary & McClellan Sunsoft Press 1997 600pp w/CD-ROM 12.00
Just Java {2nd Edition}
Peter van der Linden Sunsoft Press 1997 560pp w/CD-ROM 12.00
shipping extra.
--
______________________________________________________________________________
/~(_)~\ o/~~
II====== l =-} saul smaizys saxmania@ripco.com o/
\_(~)_/ web page=http://pages.ripco.com:8080/~saxmania (~)o/
vox 773/907/8229 data:fax 773/907/8521 \8/
______________________________________________________________________________
______________________________________________________________________________
------------------------------
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 1482
**************************************
