[17595] in Perl-Users-Digest
Perl-Users Digest, Issue: 5015 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Dec 2 09:05:33 2000
Date: Sat, 2 Dec 2000 06:05:06 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <975765906-v9-i5015@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 2 Dec 2000 Volume: 9 Number: 5015
Today's topics:
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: Anybody know what the carriage control characters a <mjcarman@home.com>
Re: array of unique random numbers <dela@nospam.ukonline.co.uk>
Re: Does map return a list or an array? <brian+usenet@smithrenaud.com>
Re: HOW TO CALL ORACLE-EXPORT FROM A PERL PROGRAM (Honza Pazdziora)
how to copy resize an image in local server ? <jingzx@sinaman.com>
how to sort a List of Hashes <linear@eecs.umich.edu>
Re: how to sort a List of Hashes (Robert Hallgren)
Re: Multiple fork()s? <rodneyra@my-deja.com>
Re: Multiple fork()s? <rodneyra@my-deja.com>
Multiple ICMP pings <rodneyra@my-deja.com>
Re: Perl and Microsoft Access Problem <W.Hielscher@mssys.com>
Re: Random password generator <mjcarman@home.com>
Re: reading from <STDIN> (Honza Pazdziora)
Re: reformatting a perl script <nospam.newton@gmx.li>
Re: Regexp q <nicmila@idoox.com>
Re: splitting a string into an array and preserving the (Garry Williams)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 02 Dec 2000 11:22:02 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage975756255.4177@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 29 Apr 2000
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last _major_ update of the Perl FAQ was in Summer
of 1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://www.cpan.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
For an alternative way to get answers, check out the Perlfaq website.
http://www.perlfaq.com/
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://www.cpan.org/
http://www.perl.com/CPAN/
http://www.cpan.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 01 Dec 2000 08:15:29 -0600
From: Michael Carman <mjcarman@home.com>
Subject: Re: Anybody know what the carriage control characters are ?
Message-Id: <3A27B281.A498552B@home.com>
Jack Altradmon wrote:
>
> I know that all the 'standard' escape characters are in the
> Camel book but it doesn't show me a '\ch' escape which does
> a backspace on my win32 platform.
Well, ^H is ^H anywhere, it's part of the ASCII standard. You don't need
to know what it's decimal/hex/octal value is, anyway, nor even that it
means "backspace." Just do
print "\b";
And Perl will do the rest. :)
-mjc
------------------------------
Date: Sat, 02 Dec 2000 12:33:37 +0000
From: "Dela Lovecraft" <dela@nospam.ukonline.co.uk>
Subject: Re: array of unique random numbers
Message-Id: <V%5W5.455$uP1.10122@news6-win.server.ntlworld.com>
Dear Joe,
> % perldoc -q shuffle
>
> Create your array of unique elements (originally in some order first),
> and then mix them up:
>
> my @values = (0..49); shuffle(@values);
Never thought of it in that way - guess I was going the long way about
it!
Thanks a million for that - really helps!
Dela
------------------------------
Date: Sat, 02 Dec 2000 06:11:52 -0500
From: brian d foy <brian+usenet@smithrenaud.com>
Subject: Re: Does map return a list or an array?
Message-Id: <brian+usenet-736B65.06115202122000@news.panix.com>
In article <90a24o$mlh@netnews.hinet.net>, "John Lin"
<johnlin@chttl.com.tw> wrote:
> Today my collegue asked me "Does map return a list or an array?".
things don't return arrays. you've got scalars or lists, depending
on the context.
> Before I answered, I carefully read the manual.
except for the parts on map(), lists, scalars, and return values?
> Hmm... the answer is "a list". I shouted out loudly "It returns a list."
> "Are you sure?" Then he gave me a quiz. "Guess what the outputs are."
>
> sub list { 'A','B','C' }
> print scalar list;
>
> sub array { my @a = ('A','B','C') }
> print scalar array;
>
> sub quess { map {$_} 'A','B','C' }
> print scalar quess;
>
> Hmm... The first function returns a list. So the answer is 'C'.
the first function returns 'C', a scalar.
> The second function returns an array. So the answer is 3.
the second function returns a scalar. the last evaluated expression
is evaluated in a scalar context because Perl knows it needs to return
a scalar. once it has that scalar, but evaluating the lexical @a in
scalar context, it returns it.
> The third returns a list (according to the document) so the answer is 'C'.
again, the third function returns a scalar.
> "Buzz... You are wrong... "
> After seeing the answer, I think Perl is a little bit too complicated to
> learn.
no - you just have the wrong model in your head. it's actaully very
simple once you *know* what Perl is doing rather than try to *intuit*
what Perl is doing.
> Do you get the correct answer?
none of those had anything to do with map other than its accidental
appearance in quess. it would be easier to read the map() documentation
i think ;)
--
brian d foy
Perl Mongers <URL:http://www.perl.org>
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
------------------------------
Date: Thu, 30 Nov 2000 11:15:05 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: HOW TO CALL ORACLE-EXPORT FROM A PERL PROGRAM
Message-Id: <G4u4L5.5rJ@news.muni.cz>
On Thu, 30 Nov 2000 10:43:36 GMT, gerhard.hann@generali.at <gerhard.hann@generali.at> wrote:
> This is a multipart message in MIME format.
> --=_alternative 003AEBF0412569A7_=
> Content-Type: text/plain; charset="us-ascii"
Please, next time don't post in HTML and stop using all-capital Subject
lines.
> my problem is, that I call a oracle-program with ` ` - I think a ` `
> always open a new shell - and so the right ORACLE_SID is not set - can
> you help me, how to do this right - is it the right way to call an
> oracle-program with `` ?
Using `` is fine (even if opening a pipe might be even more efficient)
but if you want to setup the environment varibable, that's what the hash
%ENV is for:
$ENV{'ORACLE_SID'} = 'sid';
Yours,
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
.project: Perl, DBI, Oracle, MySQL, auth. WWW servers, MTB, Spain.
Petition for a Software Patent Free Europe http://petition.eurolinux.org
------------------------------------------------------------------------
------------------------------
Date: Sat, 02 Dec 2000 05:55:21 +0800
From: jin zengxiang <jingzx@sinaman.com>
Subject: how to copy resize an image in local server ?
Message-Id: <3A281E49.2D52BD6@sinaman.com>
Hi,there:
I have down load some image from remote websit to lacal server where my
perl script is placed .now
I want to change the image size of these images .I 've tried by
following code segment:
***************************************************************************
$small=new GD::Image(50,50);
$ini_img=newFromPng GD::Image("download.png");
($srcW, $srcH)=$ini_img->getBounds();
$small->copyResized($ini_img,0,0,0,0,40,30,$srcW,$srcH);
open (SMALL ,">small.png");
binmode SMALL ;
print SMALL $small;
close(SMALL);
**********************************
but I found that the new created small.png is empty .can anybody show
me the reason ?
Rgds,
Alan JZX
------------------------------
Date: Sat, 2 Dec 2000 03:53:53 -0500
From: Hsien-Hsin Lee <linear@eecs.umich.edu>
Subject: how to sort a List of Hashes
Message-Id: <Pine.LNX.4.10.10012020350440.16492-100000@willamette.eecs.umich.edu>
Hi,
A trivial question, but baffled me. Could some experts show me how to sort
a List of Hashes data structure by a particular field (e.g. last as
follow) ?
thanks in advance,
- Sean
@friends = (
{
last => "Mouse,",
first => "Mickey",
home => "1234567",
work => "2468912",
},
{
last => "Duck,",
first => "Donald",
home => "47365743",
cell => "38457592",
},
)
------------------------------
Date: Sat, 02 Dec 2000 11:28:02 GMT
From: sandhall@swipnet.se (Robert Hallgren)
Subject: Re: how to sort a List of Hashes
Message-Id: <slrn92hn85.150.sandhall@poetry.lipogram>
On Sat, 2 Dec 2000 03:53:53 -0500,
Hsien-Hsin Lee <linear@eecs.umich.edu> wrote:
> A trivial question, but baffled me. Could some experts show me how to
> sort a List of Hashes data structure by a particular field (e.g. last
> as follow) ?
perldoc -q sort
Example:
my @sorted = map { $_->[0] }
sort { $a->[1] cmp $b->[1] }
map { [ $_, uc($_->{last}) ] } @friends;
Robert
--
Robert Hallgren <sandhall@swipnet.se>
PGP: http://www.lipogram.com/pgpkey.asc
5F1E 95C2 F0D8 25A3 D1BE 0F16 D426 34BD 166A 566C
------------------------------
Date: Sat, 02 Dec 2000 12:42:43 GMT
From: Rodney Ramos <rodneyra@my-deja.com>
Subject: Re: Multiple fork()s?
Message-Id: <90aqo3$3nn$1@nnrp1.deja.com>
In article <7TYN5.1691$b5.144306@news.uswest.net>,
"John S" <jhscrimsher@uswest.net> wrote:
> I have been looking for something like this for a few days now... I
have a
> process that currently takes about 12-24 hours to run because it has
to
> check each computer on our local network (about 12,000 machines). I
tried
> to speed up the process by forking out each computer check, but (on
> Windows2k) my script bombs and creates a Dr. Watson at 360 forks.
>
> I tried this script as well, and it seem to fail at around 219 (on my
> machine), when I bump up the number for $num_children. The only way
that I
> can get it to work consistently is to place the wait right after the
spawn:
> for (my $i = 0; $i < $num_children; $i++)
> {
> spawn(\&childproc, $i);
> wait;
> }
>
> However that puts me back to waiting for each process to finish before
> starting the next, negating the use of fork.
>
> Does anyone have thoughts on ways to fork a set number, wait until
those
> die, then fork somemore?
>
> Something along the lines of :
> for (my $i = 0; $i < $num_children; $i++)
> {
> spawn(\&childproc, $i);
> wait if (($procCount % 200) == 0); #I tried this but with same
> results - bomb at 219
> }
>
> Thanks in advance for your thoughts,
>
> John
>
> "Martien Verbruggen" <mgjv@tradingpost.com.au> wrote in message
> news:slrn8ufghh.294.mgjv@martien.heliotrope.home...
> >
>
>
I´m having a problem like this one, but with Solaris 2.6. I made a
script to ping 500 routers, using fork, and at the end a receive a
message of "segment fault" and a core dump file is genarated.
Any idea to solve the problem?
Thanks,
Rodney.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 02 Dec 2000 12:44:51 GMT
From: Rodney Ramos <rodneyra@my-deja.com>
Subject: Re: Multiple fork()s?
Message-Id: <90aqs3$3o0$1@nnrp1.deja.com>
In article <7TYN5.1691$b5.144306@news.uswest.net>,
"John S" <jhscrimsher@uswest.net> wrote:
> I have been looking for something like this for a few days now... I
have a
> process that currently takes about 12-24 hours to run because it has
to
> check each computer on our local network (about 12,000 machines). I
tried
> to speed up the process by forking out each computer check, but (on
> Windows2k) my script bombs and creates a Dr. Watson at 360 forks.
>
> I tried this script as well, and it seem to fail at around 219 (on my
> machine), when I bump up the number for $num_children. The only way
that I
> can get it to work consistently is to place the wait right after the
spawn:
> for (my $i = 0; $i < $num_children; $i++)
> {
> spawn(\&childproc, $i);
> wait;
> }
>
> However that puts me back to waiting for each process to finish before
> starting the next, negating the use of fork.
>
> Does anyone have thoughts on ways to fork a set number, wait until
those
> die, then fork somemore?
>
> Something along the lines of :
> for (my $i = 0; $i < $num_children; $i++)
> {
> spawn(\&childproc, $i);
> wait if (($procCount % 200) == 0); #I tried this but with same
> results - bomb at 219
> }
>
> Thanks in advance for your thoughts,
>
> John
>
> "Martien Verbruggen" <mgjv@tradingpost.com.au> wrote in message
> news:slrn8ufghh.294.mgjv@martien.heliotrope.home...
> >
>
>
I´m having a problem like this one, but with Solaris 2.6. I made a
script to ping 500 routers, using fork, and at the end a receive a
message of "segment fault" and a core dump file is genarated.
Any idea to solve the problem?
Thanks,
Rodney.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 02 Dec 2000 12:20:37 GMT
From: Rodney Ramos <rodneyra@my-deja.com>
Subject: Multiple ICMP pings
Message-Id: <90apel$30g$1@nnrp1.deja.com>
Does anyone know how can I make a scrip to ping several hosts at same
time? I mean, I want to ping several hosts without having to wait one
finish to ping the next, because I have to do this in a short period of
time and I have more than 1,000 hosts.
Thanks,
Rodney.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 02 Dec 2000 14:37:47 +0100
From: Wolfgang Hielscher <W.Hielscher@mssys.com>
Subject: Re: Perl and Microsoft Access Problem
Message-Id: <3A28FB2B.3829F8A2@mssys.com>
Timothy Frye wrote:
> I then made a change to the program and it failed. I removed what I changed
> and it still failed. I even separated just the database interaction part
> out and ran just that part of the program to no avail.
Hhmm, sound like voodoo stuff... ;-)
> The problem is this;
> after SELECTing the appropriate values,
> fetchrow_array returns only the last value that was selected. Here is the
> code:
[snip]
> ($call, $handle, $trouble, $start, $end, $notes, $time, $dept,
> $caller)=$sth->fetchrow_array()||die"Couldn't fetch row info:".$sth->errstr;
[snip]
Here you picked the "wrong" operator. Due to its high precedence ||
forces its left side, the call of subroutine "fetchrow_array()", in a
scalar context. Obviously this sub returns the element of the last
column which is not '' nor 0 but 'Tim'. Because 'Tim' is considered to
be true the assignment takes place. You only got one scalar which is
assigned to the first variable given in the list.
You can fix this by using "or" instead of "||".
Cheers
Wolfgang
------------------------------
Date: Fri, 01 Dec 2000 08:31:59 -0600
From: Michael Carman <mjcarman@home.com>
Subject: Re: Random password generator
Message-Id: <3A27B65F.4FA51D82@home.com>
simbean@my-deja.com wrote:
>
> fallenang3l@my-deja.com wrote:
> > I am looking for a random password generator (don't bother with
> > Crypt::RandPasswd because sometimes it can be painstainklingly [sp?]
> > slow). It doesn't have to be really complicated, just pretty random.
>
> I wrote a password generator once.
> Please don't tell me that it is ugly or slow, because I know it is for
> I am still learning. But I would appreciate advice about how to create
> better [cleaner] code. :)
>
> Ok, here we go:
>
> my @all =
> ('1', '2', '3', '4', '5', '6', '7', '8', '9', '0', 'A', 'B', 'C',
> 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
> 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c',
> 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p',
> 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z');
We can trivially improve our handicap greatly on just this one line!
Read up on the .. operator:
my @all = (0 .. 9, 'A' .. 'Z', 'a' .. 'z');
> srand (time | $$);
I'm not sure if that constitues a "good" seed or not. The manpage on
srand() should help, though. At any rate, it isn't needed with Perl
5.004+
> my $p, $z, $value;
>
> while(length($p)<6)
> {
> $p = "";
> $z = 0;
> while($z<6)
> {
> $value = int (rand(64));
> $p .= $all[$wert];
> $z++;
> }
> }
> return $p;
The general idea is good, but it can be made more compact and flexible.
(In a word, more Perlish.) This question comes up on this ng
periodicallly, Here's one of the previous answers:
#!/usr/local/bin/perl5 -w
# rndpwd - generate a random alphanumeric password of
# any length (default 8)
use strict;
if ($[ < 5.004) {
# srand call needed if version < 5.004
srand(time ^ ($$ << 15));
}
my @chars = (0..9, 'a'..'z', 'A'..'Z');
my $len = shift || 8;
my $pwd;
$pwd = join '', map{$chars[rand @chars]} 1 .. $len;
print "$pwd\n";
__END__
Figuring out how it works is left as an exercise for the reader. :)
-mjc
------------------------------
Date: Thu, 30 Nov 2000 18:19:51 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: reading from <STDIN>
Message-Id: <G4uo93.5CK@news.muni.cz>
On Thu, 30 Nov 2000 17:48:41 GMT, simbean@my-deja.com <simbean@my-deja.com> wrote:
>
> All I want to do is have a non-blocking read from <STDIN>.
Either use select and check if something is available for you in the
filehandle, or use Term::ReadKey.
Yours,
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
.project: Perl, DBI, Oracle, MySQL, auth. WWW servers, MTB, Spain.
Petition for a Software Patent Free Europe http://petition.eurolinux.org
------------------------------------------------------------------------
------------------------------
Date: Sat, 02 Dec 2000 13:03:16 +0100
From: "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.li>
Subject: Re: reformatting a perl script
Message-Id: <g4nh2t43oiqahiudgekhdv2dp8vhhfjk6l@4ax.com>
On Fri, 01 Dec 2000 10:19:07 GMT, Bart Lateur <bart.lateur@skynet.be> wrote:
> Philip 'Yes, that's my address' Newton wrote:
>
> >B::Deparse, but usually invoked through the O module via -MO=Deparse.
>
> As an aside: what's the trick? How come the script if never run, if
> invoked with an O::* module?
RTFM (`perldoc O`):
: The `import' function which that calls loads in the appropriate
: `B::Backend' module and calls the `compile' function in that
: package, passing it OPTIONS. That function is expected to return
: a sub reference which we'll call CALLBACK. Next, the "compile-
: only" flag is switched on (equivalent to the command-line option
: `-c') and an END block is registered which calls CALLBACK. Thus
: the main Perl program mentioned on the command-line is read in,
: parsed and compiled into internal syntax tree form. Since the `-
: c' flag is set, the program does not start running (excepting
: BEGIN blocks of course) but the CALLBACK function registered by
: the compiler backend is called.
Your question is equivalent to asking "How come my script doesn't run if I use
the -c flag on my command line?".
I don't know how to turn on the "compile-only" flag, though, and I wasn't
inquisitive enough to RTFS. My guess is something in XS, and/or mucking around
with $^C aka $COMPILING.
Cheers,
Philip
--
Philip Newton <nospam.newton@gmx.li>
If you're not part of the solution, you're part of the precipitate.
------------------------------
Date: Thu, 30 Nov 2000 14:27:04 +0100
From: Miloslav Nic <nicmila@idoox.com>
Subject: Re: Regexp q
Message-Id: <3A2655A8.3A517054@idoox.com>
Because while (<>) reads just one line for each step, so it cannot match
multiple comments :)
Adrian Clark wrote:
>
> Dear group,
>
> I'm trying to remove all the comments from a C file, and print the remainder
> to STDOUT. I have used the following:
>
> #!/bin/perl -w
> use strict;
>
> while (<>) {
> # switch /*<1 or more characters>*/ for ""
> s#/\*.+?\*/##sg;
> print;
> }
>
> with a input file that contains the following, multi-line comment is not
> removed - i.e.
>
> input file:
> /* Single line comment */
> a=b; /* Comment at end of line */
> c=d; /* Multiline....
> *
> *
> * ....comment */
>
> Outputfile:
>
> a=b;
> c=d; /* Multiline....
> *
> *
> * ....comment */
>
> Can anybody tell me why this piece of code is failing.
> Thanks
> Adrian
--
******************************************
<firstName> Miloslav </firstName>
<surname> Nic </surname>
<mail> nicmila@idoox.com </mail>
<support> http://www.zvon.org </support>
<zvonMailingList>
http://www.zvon.org/index.php?nav_id=4
</zvonMailingList>
------------------------------
Date: Sat, 02 Dec 2000 13:02:58 GMT
From: garry@zweb.zvolve.net (Garry Williams)
Subject: Re: splitting a string into an array and preserving the "\n"
Message-Id: <6q6W5.114$Xq5.8260@eagle.america.net>
On 28 Nov 2000 14:46:08 -0700, Tom Christiansen <tchrist@perl.com> wrote:
>In article <8l882tk02hc5tbqq922u066f9fh1iho2gv@4ax.com>,
>Bart Lateur <bart.lateur@skynet.be> wrote:
>>Tom Christiansen wrote:
>>
>>>"Online documentation" is documentation that is available via
>>>computer; that is, in electronic form ("softcopy").
Actually, Merriam-Webster doesn't recognize "online" as a word -- it's
"on-line".
Main Entry: on-line
Function: adjective or adverb
Date: 1950
: connected to, served by, or available through a system and
especially a computer or telecommunications system <an on-line
database>; also : done while connected to a system <on-line
computer storage>
--
Garry Williams
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 5015
**************************************
