[11414] in Perl-Users-Digest
Perl-Users Digest, Issue: 5014 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Mar 1 11:07:37 1999
Date: Mon, 1 Mar 99 08:04:17 -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 Mon, 1 Mar 1999 Volume: 8 Number: 5014
Today's topics:
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: strip first character of string? (Tad McClellan)
Re: SYNTAX ERROR REVISITED <droby@copyright.com>
Re: syntax error? <jdf@pobox.com>
Re: syntax error? (Ronald J Kimball)
The dumbest newbie question ever..? <mapman@frii.com>
Re: The dumbest newbie question ever..? (Bill Moseley)
Re: The dumbest newbie question ever..? (Larry Rosler)
Re: The dumbest newbie question ever..? (Jeffrey Drumm)
Re: The dumbest newbie question ever..? (Larry Rosler)
Re: The dumbest newbie question ever..? <stampes@xilinx.com>
Re: The dumbest newbie question ever..? (Andrew M. Langmead)
Urgent: Help: limit to string size, or...? <soli@pc-szoftver.mgx.hu>
Re: Using a glob with sort (Larry Rosler)
vote counting scripts or software <wsm0@ns3-1.CC.Lehigh.EDU>
Why isn't this a race condition ? <cederstrom@removethis.kolumbus.fi>
Re: Why isn't this a race condition ? <jdf@pobox.com>
Re: Why isn't this a race condition ? (Andrew M. Langmead)
Re: Why isn't this a race condition ? <cederstrom@removethis.kolumbus.fi>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 1 Mar 1999 15:05:22 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <7beabi$ti$1@info.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 22 Feb 1999 14:47:54 GMT and ending at
01 Mar 1999 18:37:32 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 1998 Greg Bacon. All Rights Reserved.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
Totals
======
Posters: 496
Articles: 1431 (593 with cutlined signatures)
Threads: 450
Volume generated: 2387.1 kb
- headers: 1022.5 kb (20,938 lines)
- bodies: 1265.2 kb (41,473 lines)
- original: 899.6 kb (31,320 lines)
- signatures: 98.0 kb (2,061 lines)
Original Content Rating: 0.711
Averages
========
Posts per poster: 2.9
median: 1.0 post
mode: 1 post - 301 posters
s: 6.4 posts
Posts per thread: 3.2
median: 2.0 posts
mode: 1 post - 130 threads
s: 3.5 posts
Message size: 1708.2 bytes
- header: 731.7 bytes (14.6 lines)
- body: 905.3 bytes (29.0 lines)
- original: 643.8 bytes (21.9 lines)
- signature: 70.1 bytes (1.4 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
65 102.3 ( 44.1/ 45.3/ 25.7) Jonathan Stowe <gellyfish@btinternet.com>
57 91.6 ( 34.4/ 51.8/ 33.6) lr@hpl.hp.com (Larry Rosler)
48 89.1 ( 36.6/ 43.7/ 42.4) abigail@fnx.com
42 79.8 ( 39.8/ 29.5/ 17.0) rjk@linguist.dartmouth.edu (Ronald J Kimball)
39 111.2 ( 31.3/ 75.9/ 69.9) tchrist@mox.perl.com (Tom Christiansen)
37 58.9 ( 31.0/ 27.8/ 17.4) bart.lateur@skynet.be (Bart Lateur)
27 52.8 ( 19.5/ 33.3/ 17.3) "Allan M. Due" <Allan@due.net>
26 39.9 ( 19.3/ 20.3/ 11.3) jglascoe@giss.nasa.gov
25 44.7 ( 14.2/ 30.5/ 20.1) tadmc@metronet.com (Tad McClellan)
24 35.7 ( 19.5/ 14.1/ 8.9) Jonathan Feinberg <jdf@pobox.com>
These posters accounted for 27.3% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
111.2 ( 31.3/ 75.9/ 69.9) 39 tchrist@mox.perl.com (Tom Christiansen)
102.3 ( 44.1/ 45.3/ 25.7) 65 Jonathan Stowe <gellyfish@btinternet.com>
91.6 ( 34.4/ 51.8/ 33.6) 57 lr@hpl.hp.com (Larry Rosler)
89.1 ( 36.6/ 43.7/ 42.4) 48 abigail@fnx.com
79.8 ( 39.8/ 29.5/ 17.0) 42 rjk@linguist.dartmouth.edu (Ronald J Kimball)
58.9 ( 31.0/ 27.8/ 17.4) 37 bart.lateur@skynet.be (Bart Lateur)
52.8 ( 19.5/ 33.3/ 17.3) 27 "Allan M. Due" <Allan@due.net>
44.7 ( 14.2/ 30.5/ 20.1) 25 tadmc@metronet.com (Tad McClellan)
39.9 ( 19.3/ 20.3/ 11.3) 26 jglascoe@giss.nasa.gov
35.7 ( 19.5/ 14.1/ 8.9) 24 Jonathan Feinberg <jdf@pobox.com>
These posters accounted for 29.6% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.970 ( 42.4 / 43.7) 48 abigail@fnx.com
0.965 ( 8.5 / 8.8) 15 fl_aggie@thepentagon.com
0.924 ( 19.3 / 20.9) 13 Greg Bacon <gbacon@cs.uah.edu>
0.921 ( 69.9 / 75.9) 39 tchrist@mox.perl.com (Tom Christiansen)
0.909 ( 3.0 / 3.3) 12 "Wade T. Funk" <wfunk@dev.tivoli.com>
0.835 ( 7.6 / 9.1) 6 "Sheila Eugenio" <seugenio@man.amis.com>
0.814 ( 4.7 / 5.8) 7 ran@netgate.net
0.763 ( 5.3 / 7.0) 10 wil <wmwilson1@go.com>
0.738 ( 4.0 / 5.4) 6 Jeff Stampes <stampes@xilinx.com>
0.708 ( 9.6 / 13.5) 15 gward@cnri.reston.va.us (Greg Ward)
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.511 ( 2.1 / 4.0) 7 "Jalil Feghhi" <jalil@corp.home.net>
0.488 ( 3.3 / 6.7) 13 Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
0.485 ( 2.1 / 4.4) 7 Jerome O'Neil <jeromeo@atrieva.com>
0.483 ( 3.6 / 7.4) 7 Arnauld Van Muysewinkel <avm@atos.be>
0.458 ( 3.7 / 8.0) 9 Zenin <zenin@bawdycaste.org>
0.435 ( 1.8 / 4.0) 7 Philip Newton <Philip.Newton@datenrevision.de>
0.387 ( 2.8 / 7.3) 13 clay@panix.com (Clay Irving)
0.360 ( 0.9 / 2.5) 5 comdog@computerdog.com (brian d foy)
0.268 ( 1.7 / 6.3) 7 cant_take@the_spam.com
0.251 ( 1.9 / 7.6) 7 "Matthew O. Persico" <mpersico@erols.com>
49 posters (9%) had at least five posts.
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
20 Can I do this w/ Perl?
17 FAQ 4.53: What happens if I add or remove keys from a hash while iterating over it?
17 Perl comment
16 What is %h=undef (assigning undef to a hash) supposed to do ?
14 Learning Perl a Question at a Time
14 change column of nmbers to 2 dim array
13 HTML parse problem
13 The dumbest newbie question ever..?
12 Sorting long list of IPs.
11 Can perl do this?
These threads accounted for 10.3% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
45.2 ( 15.1/ 27.8/ 22.8) 14 change column of nmbers to 2 dim array
43.6 ( 2.8/ 40.6/ 40.2) 4 Need Threads Examples
33.1 ( 14.2/ 18.0/ 8.9) 20 Can I do this w/ Perl?
29.5 ( 14.6/ 13.7/ 9.1) 17 FAQ 4.53: What happens if I add or remove keys from a hash while iterating over it?
27.2 ( 2.2/ 24.8/ 23.6) 3 HELP: Am 100% lost on these error msgs
27.0 ( 12.5/ 12.6/ 8.1) 17 Perl comment
22.1 ( 12.3/ 8.7/ 5.4) 16 What is %h=undef (assigning undef to a hash) supposed to do ?
19.6 ( 11.3/ 7.1/ 4.2) 14 Learning Perl a Question at a Time
19.0 ( 9.7/ 8.5/ 4.4) 13 HTML parse problem
18.9 ( 9.0/ 9.2/ 5.6) 13 The dumbest newbie question ever..?
These threads accounted for 12.0% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.945 ( 11.1/ 11.7) 5 Statistics for comp.lang.perl.misc
0.944 ( 11.4/ 12.1) 6 Passing two arrays to a subroutine
0.897 ( 3.0/ 3.3) 5 check email validy "in real time"
0.870 ( 7.4/ 8.5) 11 Can perl do this?
0.856 ( 5.3/ 6.1) 7 confused about $/
0.832 ( 3.0/ 3.6) 6 HELP: Pattern matching.
0.827 ( 8.2/ 10.0) 7 Help!!
0.825 ( 4.7/ 5.7) 5 Tricky input problem...
0.822 ( 22.8/ 27.8) 14 change column of nmbers to 2 dim array
0.808 ( 5.3/ 6.6) 7 IO::File <$fh> vs $fh->getline
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.510 ( 2.6 / 5.2) 7 The crypt() function is unimplemented due to excessive paranoia
0.504 ( 5.4 / 10.8) 8 map + grep replacement for this foreach
0.503 ( 2.8 / 5.6) 7 randomize sequence
0.502 ( 2.9 / 5.8) 8 Array Initialization and directory list searching
0.491 ( 1.6 / 3.4) 5 String parsing against two seperatros
0.491 ( 8.9 / 18.0) 20 Can I do this w/ Perl?
0.490 ( 4.2 / 8.6) 12 Sorting long list of IPs.
0.488 ( 1.6 / 3.2) 5 Help a newbie please!
0.366 ( 1.1 / 3.1) 5 Calling functions from another file
0.357 ( 0.7 / 1.9) 5 How do I make an interactive session ?
85 threads (18%) had at least five posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
29 comp.lang.perl.modules
16 comp.lang.perl
15 alt.perl
7 comp.unix.shell
6 comp.lang.perl.moderated
5 comp.unix.questions
5 comp.unix.programmer
5 comp.unix.solaris
4 comp.infosystems.www.servers.unix
4 comp.lang.java.programmer
Top 10 Crossposters
===================
Articles Address
-------- -------
15 swintel@badchips.com (Boycott Swintel)
15 Jonathan Stowe <gellyfish@btinternet.com>
11 Nektarios Kalogridis <nektarios@home.com>
6 "Kano" <keith@cs.oswego.edu>
6 JoHn DoH <johndoh@home.com>
6 bell@clark.net
6 comdog@computerdog.com (brian d foy)
6 rjk@linguist.dartmouth.edu (Ronald J Kimball)
4 David L Nicol <david@kasey.umkc.edu>
4 Y W Wong <ywwong_hk@hotmail.com>
------------------------------
Date: Sat, 27 Feb 1999 06:14:31 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: strip first character of string?
Message-Id: <n2k8b7.89d.ln@magna.metronet.com>
Peter Bismuti (bismuti@cs.fsu.edu) wrote:
: Hi, what is the easiest way to strip the first character off of a
: string? If you want to strip off the last character you can use
: chomp($word);
That does strip off the last character.
Sometimes it may strip no characters.
Sometimes it may strip more than one character.
chop() strips off the last character.
: How about the first character?
$word =~ s/.//s;
or
substr($word, 0, 1) = '';
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 01 Mar 1999 13:44:16 GMT
From: Don Roby <droby@copyright.com>
Subject: Re: SYNTAX ERROR REVISITED
Message-Id: <7be5jd$dss$1@nnrp1.dejanews.com>
In article <1dny8yu.3jv8r2mhpcxcN@bay2-242.quincy.ziplink.net>,
rjk@linguist.dartmouth.edu (Ronald J Kimball) wrote:
>
> Ask your sysadmin whether perl5 is installed on your system, and if so,
> what the path to it is.
>
And if not, why?
Also be sure to mention that there are no plans to make Perl4 Y2K compliant.
--
Don Roby
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 27 Feb 1999 11:02:09 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: "Allan M. Due" <Allan@Due.net>
Subject: Re: syntax error?
Message-Id: <m3d82vsum6.fsf@joshua.panix.com>
"Allan M. Due" <Allan@Due.net> writes:
> J. Daniel Paxton wrote
> : $timesleft {$Account_Number} --;
>
> Ok just a quick guess. Is it my lame newsreader or are there extra
> spaces in there.
> $timesleft{$Account_Number}--;
Nothing wrong with the whitespace in JDP's code (other than looking
weird!). Did you try it?
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Sat, 27 Feb 1999 12:08:48 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: syntax error?
Message-Id: <1dnvw0b.16bskeg1q8hbdwN@bay3-97.quincy.ziplink.net>
J. Daniel Paxton <paxtond@ix.netcom.com> wrote:
> Of course the logic of the script may be flawed as well but I
> need to get past the syntax error at the line : "if (exists $timesleft"
Would you mind telling us what that syntax error is? Thanks!
The only error I got is in this line:
> print "email him at McDaniel@Curryinc.com for additional credit.\n\n";
You have to backslash that @ in modern perls.
--
chipmunk (Ronald J Kimball) <rjk@linguist.dartmouth.edu>
perl -e 'print map chop, sort split shift, reverse shift
' 'j_' 'e._jP;_jr/_je=_jk{_jn*_j &_j :_j @_jr}_ja)_js$_j
~_jh]_jt,_jo+_jJ"_jr>_ju#_jt%_jl?_ja^_jc`_jh-_je|' -rjk-
------------------------------
Date: Sun, 28 Feb 1999 08:56:41 -0700
From: Mike Eley <mapman@frii.com>
Subject: The dumbest newbie question ever..?
Message-Id: <36D96738.90D83E69@frii.com>
ok here it is
i just started trying to use perl yesterday
bought the book 'Perl 5 Complete'
page 45 says to type in this:
perl -e 'print "Hello, World\n";'
the error message i get back is:
Can't find string terminator " ' " anywhere before EOF at -e line 1.
Should this actually work?
Did I buy a lame book?
Why am I trying to do this anyway?
How did I get myself into this mess?
Thanks people,
mike
------------------------------
Date: Sat, 27 Feb 1999 08:11:55 -0800
From: moseley@best.com (Bill Moseley)
Subject: Re: The dumbest newbie question ever..?
Message-Id: <MPG.1141b921d83375c89896c2@206.184.139.132>
[This followup was posted to comp.lang.perl.misc and a copy was sent to
the cited author.]
In article <36D96738.90D83E69@frii.com>, mapman@frii.com says...
> perl -e 'print "Hello, World\n";'
>
> the error message i get back is:
>
> Can't find string terminator " ' " anywhere before EOF at -e line 1.
Windows? Can't use single quotes in Win 95
perl -e "print 'Hello World\n';"
You don't need double quotes around 'Hello World', anyway.
You can use 'qq' to make double quotes within double quotes if needed.
> Should this actually work?
> Did I buy a lame book?
> Why am I trying to do this anyway?
> How did I get myself into this mess?
Call your friends and family now and tell them you will see them in about
a year.
--
Bill Moseley mailto:moseley@best.com
------------------------------
Date: Sat, 27 Feb 1999 08:33:10 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: The dumbest newbie question ever..?
Message-Id: <MPG.1141be24488fb9319896a6@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <36D96738.90D83E69@frii.com>, on Sun, 28 Feb 1999 08:56:41 -
0700 mapman@frii.com says...
> ok here it is
> i just started trying to use perl yesterday
> bought the book 'Perl 5 Complete'
> page 45 says to type in this:
>
> perl -e 'print "Hello, World\n";'
>
> the error message i get back is:
>
> Can't find string terminator " ' " anywhere before EOF at -e line 1.
>
> Should this actually work?
That depends on the command interpreter (shell) you are using.
> Did I buy a lame book?
Possibly, but that isn't clear from this example. (See
<URL:http://www.perl.com/> for book reviews. Most of us recommend
"Learning Perl" from O'Reilly and Asscociates, followed by "Programming
Perl" from the same publishers.)
> Why am I trying to do this anyway?
Because you are a closet masochist? :-)
> How did I get myself into this mess?
By using the misbegotten command interpreter supplied by default with
Windows/DOS systems. A single-quote is not recognized as an argument
delimiter -- it must be a double-quote. Try the following, and all will
be well:
perl -e "print \"Hello, World\n\";'
or use the alternate double-quote delimiters (better, I think, though
you may not yet have encountered them in your book):
perl -e "print qq{Hello, World\n};"
> Thanks people,
> mike
You're welcome.
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Sat, 27 Feb 1999 16:48:38 GMT
From: jdrumm@blazenetme.net (Jeffrey Drumm)
Subject: Re: The dumbest newbie question ever..?
Message-Id: <36d81d43.10059096@news.blazenetme.net>
[posted to comp.lang.perl.misc and mailed]
On Sun, 28 Feb 1999 08:56:41 -0700, Mike Eley <mapman@frii.com> wrote:
>ok here it is
>i just started trying to use perl yesterday
>bought the book 'Perl 5 Complete'
>page 45 says to type in this:
>
>perl -e 'print "Hello, World\n";'
>
>the error message i get back is:
>
>Can't find string terminator " ' " anywhere before EOF at -e line 1.
Hmm . . . lemme guess, Win32, right?
>Should this actually work?
It should, on an operating system that isn't somewhat deficient in its
command line quoting options.
>Did I buy a lame book?
Yes, if it doesn't cover the differences between Perl's implementation on
the various platforms on which it runs.
>Why am I trying to do this anyway?
Huh?
>How did I get myself into this mess?
Well, for one, you apparently installed an M$ operating system on a
perfectly good piece of hardware . . . :-)
Win32 systems don't understand single quotes on the command line. You'll
need to double-quote the string you're attempting to execute. Of course,
with Perl, There Is More Than One Way To Do It. Here are two:
perl -e "print qq(Hello, World!\n)"
perl -e "print \"Hello, World!\n\""
--
- Jeff
------------------------------
Date: Sat, 27 Feb 1999 08:39:42 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: The dumbest newbie question ever..?
Message-Id: <MPG.1141bfa5d755099a9896a7@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <MPG.1141b921d83375c89896c2@206.184.139.132>, on Sat, 27 Feb
1999 08:11:55 -0800 moseley@best.com says...
> In article <36D96738.90D83E69@frii.com>, mapman@frii.com says...
> > perl -e 'print "Hello, World\n";'
...
> perl -e "print 'Hello World\n';"
I doubt that he wanted to print the string
Hello World\n
> You don't need double quotes around 'Hello World', anyway.
You do if you want to print a new-line, though. :-)
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 27 Feb 1999 16:39:36 GMT
From: Jeff Stampes <stampes@xilinx.com>
Subject: Re: The dumbest newbie question ever..?
Message-Id: <7b9748$7p2@courier.xilinx.com>
Mike Eley <mapman@frii.com> wrote:
: perl -e 'print "Hello, World\n";'
: Can't find string terminator " ' " anywhere before EOF at -e line 1.
: Should this actually work?
Sure, unless your using some crippled, lame command shell...which
since you're using Win95 and the standard cmd.exe, you are. In your
world:
perl -e "print \"Hello, World\n\"";
should work.
You could make your life better and easier by getting a better
chell to use such as tcsh or bash.
-Jeff
--
Jeff Stampes -- Xilinx, Inc. -- Boulder, CO -- jeff.stampes@xilinx.com
------------------------------
Date: Sat, 27 Feb 1999 18:52:52 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: The dumbest newbie question ever..?
Message-Id: <F7tts4.IB1@world.std.com>
lr@hpl.hp.com (Larry Rosler) writes:
>By using the misbegotten command interpreter supplied by default with
>Windows/DOS systems. A single-quote is not recognized as an argument
>delimiter -- it must be a double-quote. Try the following, and all will
>be well:
> perl -e "print \"Hello, World\n\";'
That doesn't work under MS-DOS either. Double quotes can't be escaped
with backslashes. (Or more accurately, can't be escaped.)
--
Andrew Langmead
------------------------------
Date: Sun, 28 Feb 1999 14:18:43 +0100
From: soli <soli@pc-szoftver.mgx.hu>
Subject: Urgent: Help: limit to string size, or...?
Message-Id: <36D94233.CCAC5DB2@pc-szoftver.mgx.hu>
Hi All,
I try to write a perl prog which sends its output as a mail to the admin
(to me:)).
The mail should be a html mail. It's ok. I use "sendmail-lib.pm". I pass
the whole
html file as the "messagebody" string to "real_send_mail" func. I made
some work
in sendmail.pm: "Content-type:text/html"..... If I write my $htmlbody
variable to a
html file, it's ok, it looks fine:)
BUT when I try to send it, only a random part of it appears in my
mailprog (pegasus,
NSmessenger). The html property of the mail is ok, but is not the whole
text I need.
The $htmlbody is 88KB. I think, there can't be a silly memory limit with
this, but then,
what is the problem (and solution) here?
It is very urgent: I should install this prog until March01 (tomorrow)!
My boss, you know...
[If you have an answer, please send replies to my address, too]
bye
SOLI
------------------------------
Date: Sat, 27 Feb 1999 08:06:04 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Using a glob with sort
Message-Id: <MPG.1141b7cb11dc1f5f9896a4@nntp.hpl.hp.com>
In article <7b92iq$frv$1@pegasus.csx.cam.ac.uk>, on 27 Feb 1999 15:22:02
GMT mjtg@cus.cam.ac.uk says...
> Larry Rosler <lr@hpl.hp.com>, quoting Andrew Langmead quoting Larry Rosler
> wrote:
...
> > local(*sortsub) = eval "sub { $sorteq }";
...
> If you're in the optimisation business, what's that eval "" doing there?
> Make it just
>
> local *sortsub = sub { whatever };
The subject of that thread, 'sort with dynamic sort expression help',
was that the comparison function was provided as a run-time argument, as
a string. Hence the eval.
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 27 Feb 1999 17:22:11 GMT
From: "Wayne S. Mery" <wsm0@ns3-1.CC.Lehigh.EDU>
Subject: vote counting scripts or software
Message-Id: <7b99k3$1tfc@fidoii.cc.Lehigh.EDU>
I'm looking for scripts or software (or web sites with information) that
will help me count votes. These votes would most likely be collected
in a log file maintained by mailing list managed by listproc.
Please mail me directly at wsm0@Lehigh.edu Thanks
--
_____________________________________________________________________________
Wayne S. Mery | Systems Programmer, Lehigh University 610-758-3983
wsm0@lehigh.edu | http://www.lehigh.edu/~wsm0
VSE/ESA 2.3 | http://www.lehigh.edu/lists/vse-l/ <---VSE mail list
** Save a Life **
** Sign an Organ Donor card **
** http://www.transweb.org for more information **
------------------------------
Date: Fri, 26 Feb 1999 18:46:51 +0200
From: "Juho Cederstrvm" <cederstrom@removethis.kolumbus.fi>
Subject: Why isn't this a race condition ?
Message-Id: <7b94ch$sm2$1@news.kolumbus.fi>
I've read the FAQ, and this is what I found:
----- (I still don't get locking. I just want to increment...):
...
Anyway, this is what to do:
...
sysopen(FH, "numfile", O_RDWR|O_CREAT, 0644) or die "can't open numfile:
$!";
flock(FH, 2) or die "can't flock numfile: $!";
...
-----
I've understood, that opening and locking should be done by the same
function. And here two functions are used. So now it seems that I was wrong.
Could you _please_ explain this to me ?
--
# this is a perl script which will display my email address
$_="acbecddeerfsgthriojmkaltmknoolpuqmrbsutsudvowtxfyi";
s/(.)(.)/$2/eg;s/at/@/;s/dot/./;print $_;
------------------------------
Date: 27 Feb 1999 11:20:13 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: "Juho Cederstrvm" <cederstrom@kolumbus.fi>
Subject: Re: Why isn't this a race condition ?
Message-Id: <m390djsts2.fsf@joshua.panix.com>
"Juho Cederstrvm" <cederstrom@kolumbus.fi> writes:
> I've read the FAQ, and this is what I found:
>
> ----- (I still don't get locking. I just want to increment...):
I guess we need another FAQ: "I *still* still don't get locking..."
> sysopen(FH, "numfile", O_RDWR|O_CREAT, 0644) or die "can't open
> numfile: $!";
> flock(FH, 2) or die "can't flock numfile: $!";
> I've understood, that opening and locking should be done by the same
> function. And here two functions are used. So now it seems that I was wrong.
> Could you _please_ explain this to me ?
I'd turn around the question and ask you, "Can you come up with a
situation in which the above code leads to a race?"
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf
------------------------------
Date: Sat, 27 Feb 1999 18:33:11 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: Why isn't this a race condition ?
Message-Id: <F7tsvB.ADs@world.std.com>
"Juho Cederstrvm" <cederstrom@removethis.kolumbus.fi> writes:
>Subject: Re: Why isn't this a race condition ?
> sysopen(FH, "numfile", O_RDWR|O_CREAT, 0644) or die "can't open numfile:
>$!";
This statement opens the file, and creates it if it doesn't exist, but
does absolutely nothing to affect the contents of the file. Many
simultaneous processes can perform this action with no interference
with the other.
> flock(FH, 2) or die "can't flock numfile: $!";
The first process to do this now gets the exclusive use of the file.
>I've understood, that opening and locking should be done by the same
>function.
Locking should be atomic, (a single indivisible unit) which is why it
is done by the kernel. (who can be used for arbitration in matters
like this.) Locking can't be done with "lockfiles" because the testing
for the existence of the lockfile, and the creation of one can't be
done atomically.
--
Andrew Langmead
------------------------------
Date: Sun, 28 Feb 1999 18:44:13 +0200
From: "Juho Cederstrvm" <cederstrom@removethis.kolumbus.fi>
Subject: Re: Why isn't this a race condition ?
Message-Id: <7bedda$6q2$1@news.kolumbus.fi>
Jonathan Feinberg wrote:
>I guess we need another FAQ: "I *still* still don't get locking..."
Nope. You don't need. Or at least not because of me. I can get locking
always when I need it. The question wasn't "How can I lock a file", it was
"why does this lock a file". And FAQ doesn't answer the second question.
--
# this is a perl script which will display my email address
$_="acbecddeerfsgthriojmkaltmknoolpuqmrbsutsudvowtxfyi";
s/(.)(.)/$2/eg;s/at/@/;s/dot/./;print $_;
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5014
**************************************
