[8642] in Perl-Users-Digest
Perl-Users Digest, Issue: 2259 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Apr 6 14:17:44 1998
Date: Mon, 6 Apr 98 11:00:25 -0700
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, 6 Apr 1998 Volume: 8 Number: 2259
Today's topics:
Re: Any ideas, expert opinions?? about.. <Tony.Curtis+usenet@vcpc.univie.ac.at>
Re: Any ideas, expert opinions?? about.. (Abigail)
Re: contexts: is there such a thing as array? <jdporter@min.net>
Re: contexts: is there such a thing as array? <cmargoli@world.northgrum.com>
Re: file permissions <wescnslt@mail.well.com>
Re: How do I strip newlines from a var (Martin Vorlaender)
Re: How to timeout TCP connect? <jay@rgrs.com>
Re: If "=~" means match what is doesn't match? <jdporter@min.net>
Re: If "=~" means match what is doesn't match? <wmooney@voicenet.com>
Re: If "=~" means match what is doesn't match? (Ronald L. Parker)
Installation problems - HP-UX 11.00 -perl5.004_04 sguna@hotmail.com
Re: Is there a "Newsgroup" for Newbies to Perl? snitty77@pacbell,net
Re: Multidimensional hashes (Lars Gregersen)
Perl Arp Program <schneidh@msoe.edu>
Re: Perl code to generate MS Excel and Access files ? (Ronald L. Parker)
Re: Post - is lwp the only answer? <aas@sn.no>
Re: Post - is lwp the only answer? (I R A Aggie)
readline in the debugger? ssharma@clearnet.com
Re: Ref Op in Context (was: Anon Scalar Expression) <jdporter@min.net>
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: Why a FAQ is irritating (was Re: How do I strip new (I R A Aggie)
Re: Why a FAQ is irritating (was Re: How do I strip new (Martin Vorlaender)
Win32 and Perl Questions (a bit more advanced) (Bryan Murphy)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 06 Apr 1998 18:14:00 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Any ideas, expert opinions?? about..
Message-Id: <7xiuonapx3.fsf@beavis.vcpc.univie.ac.at>
Re: Any ideas, expert opinions?? about.., Lalit
<ljairath@wright.aps.uoguelph.ca> said:
Lalit> Every month we update the HTML text file (~/gev.html)
Lalit> wiht new information and we have to replace the value
Lalit> of the checked month (e.g. April here) with the value
Lalit> of the new month (e.g. in next month April will be
Lalit> replaced by May).
I'd do it via a CGI script instead of a static HTML file.
perldoc CGI
You can use POSIX::strftime to format the dates in the file
as you want. The Date::DateCalc and Date::Manip modules
help you to play with various dates, and date ranges.
perldoc POSIX
perldoc Date::DateCalc
perldoc Date::Manip
Your post didn't actually have anything to do with perl per
se though. Please try to be a bit more focussed on the perl
aspects, you'll save yourself a lot of toasting.
perldoc perlfaq
tony
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
"Everything I am, I learned on the back of cereal boxes" ~ RJ, "Over the Hedge"
------------------------------
Date: 6 Apr 1998 16:50:09 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Any ideas, expert opinions?? about..
Message-Id: <6gb141$85i$1@client2.news.psi.net>
Lalit Jairath (ljairath@wright.aps.uoguelph.ca) wrote on MDCLXXIX
September MCMXCIII in <URL: news:6gap71$p0o$2@ccshst05.cs.uoguelph.ca>:
++
++ Q: i've an HTML text file- ~/gev.html part of which looks like as below.
++ (the original text, pl. see below).
++
++ Please, read the entire e-mail before replying!
++
++ Every month we update the HTML text file (~/gev.html) wiht new information
++ and we have to
++ replace the value of the checked month (e.g. April here) with the value
++ of the new month (e.g. in next month April will be replaced by May).
++
++ Also, we've to add another line (pull down) for April, the replaced month
++ (unchecked now). So, the new file should look like as below.
++
++ (Please see both the original and updated text (as it should look) below.
++
++
++ i've to do this at several places in the file and for several files.
How uninteresting. Sounds like a simple job.
Now, what exactly is your question?
Abigail
--
perl -wleprint -eqq-@{[ -eqw\\- -eJust -eanother -ePerl -eHacker -e\\-]}-
------------------------------
Date: Mon, 06 Apr 1998 16:30:26 GMT
From: John Porter <jdporter@min.net>
Subject: Re: contexts: is there such a thing as array?
Message-Id: <3529048C.3AEB@min.net>
Randal Schwartz wrote:
>
> @days{'a','c'} # same as ($days{'a'},$days{'c'})
>
> And "same as" seems to be fairly literal. It's intuitive that this
> comma there in a scalar context becomes the "evaluate left, discard,
> evaluate right" operator. And thus it works.
The bizarre thing (to me) is that in
scalar @foo{ EXPR1, EXPR2 }
the comma is behaving in a scalar context, yet EXPR1 and EXPR2 are
being evaluated in a list context. Not that that's bad, just
perhaps somewhat counterintuitive?
It's like there's a "scalarizing" context. EXPR2 gets evaluated
in a list context, and may return a list of many items. Yet
the scalar context, as enforced by the comma, still insists on
discarding all but the last item in that list. Can you say that
the comma doesn't even see the list result from EXPR2?
Or does perl do something bizarre like take the list from EXPR2
and insert (expand) it in-line, with comma-ops inserted?
John Porter
------------------------------
Date: Mon, 6 Apr 1998 17:26:16 GMT
From: Charles Margolin <cmargoli@world.northgrum.com>
Subject: Re: contexts: is there such a thing as array?
Message-Id: <35291038.2C4C@world.northgrum.com>
Randal Schwartz wrote:
> I do. It's right in "man perldata", by example:
>
> @days{'a','c'} # same as ($days{'a'},$days{'c'})
>
> And "same as" seems to be fairly literal. It's intuitive that this
> comma there in a scalar context becomes the "evaluate left, discard,
> evaluate right" operator. And thus it works.
So much of Perl is "defined" to the reader only in examples.
Slices don't even rate their own heading or paragraph (or an index
entry in the Camel book). It's too easy for a novice to infer a
concept that isn't true and was not intended by the authors.
Maybe we need to say that a slice is expanded (at compile time?) into
its elements separated by commas. After all, a few lines earlier in
perldata, the whole array is shown next to a comma-separated expression
containing its elements (no it doesn't say "same as"), but that doesn't
mean that @data is shorthand for a slice containing all of the elements.
--
Charles G. Margolin DSSD Internal Information Services
cmargoli@world.northgrum.com Northrop Grumman Corp. 0624/23
margolin@acm.org Hawthorne, California 90250-3277
------------------------------
Date: Tue, 07 Apr 1998 09:21:14 -0700
From: "William E. Spears" <wescnslt@mail.well.com>
To: Miss WILKINS <fr39@dial.pipex.com>
Subject: Re: file permissions
Message-Id: <352A5279.D850606E@mail.well.com>
Hi,
My script is doing some of the same things that Michael's is doing. It
creates a directory, uploads files to the directory, and opens a new
file in the directory and writes html to it. The directory is owned by
"nobody" for the reasons you described, but neither the script nor I am
permitted to run chown on it. I ran man on chown and learned that only
the superuser can run it.
If you can't run chown, what can you do?
Bill Spears
Miss WILKINS wrote:
> Hi
>
> The cgi will run as the owner of the web server unless they have set
> SUID
> or have individual V.servers running under different UID/GID.
>
> Basically to make sure that all is set as you wish I would do a chown
> (no
> need for the exec I think) on the directory and file, as long as you
> have
> pemission to do that.
>
> Iqbal
>
> emai iqbal@etc.prestel.co.uk
>
> Michael Wentzel <wentzel@umr.edu> wrote in article
> <352165e7.0@news.cc.umr.edu>...
> > I have a script that is being run with a POST method from a HTML
> document
>
> > that will create a directory, on server side, if it does not exist
> then
> > will create a file in this directory(this is to allow files that
> should
> > be grouped together to reside in the same directory). The problem
> is
> > that the newly created directory has a owner id of 32766 and not the
>
> > owner of the directory above, therefore when it tries to create a
> file in
>
> > the newly create dir the script fails. Any suggestions... The only
> thing
>
> > I can think of is using 'exec "chown <user> <directory name>";'.
> >
> >
> > Michael Wentzel
> > wentzel@umr.edu
> >
------------------------------
Date: Mon, 06 Apr 1998 17:23:15 +0200
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: How do I strip newlines from a var
Message-Id: <3528f363.524144494f47414741@radiogaga.harz.de>
Lloyd Zusman (ljz@asfast.com) wrote:
: catfood@apk.net (Mark W. Schumann) writes:
: > In article <lassehp-0504980146130001@ygdrasil.imv.aau.dk>,
: > <lassehp@imv.aau.dk> wrote:
: > >Suppose you stand at a bus stop and someone asks you what time it is. You
: > >answer: "There will be a partial solar eclipse on tuesday at 1430
: > >Universal Time, which is in only 117 hours and 35 minutes from now. If you
: > >are too stupid to do the math, look across the street."
: >
: > Bad analogy.
: >
: > It's more as if you'd been busy at a meeting of watchmakers, antique
: > clock collectors, and engineers who work on time calculations.
: > Somebody comes in, doesn't look around, doesn't read the booklet titled
: > "How To Tell What Time It Is Now" that is handed out at the door, walks
: > into the middle of the room, and says loudly enough for everyone to
: > hear: "Can anyone tell me what time it is?"
: Well, this analogy doesn't quite cut it, either, since there is no
: booklet handed out at the door here until *after* someone makes their
: first post and receives the automatic emailing.
: A still better analogy is for the "somebody" described above to see a
: sign on a door that says "Experts at Telling Time Forum, Open to the
: Public" and to walk in, asking the "Can anyone tell me what time it
: is?" question. In response, some of the people in the room rudely
: and condescendingly tell this person to go away and read the "How To
: Tell What Time It Is Now" pamphlet, even though this person had no
: idea prior to entering that this pamphlet even exists.
What became of the tradition of first _read_ a newsgroup for a while to
get accustomed to the rules before writing anything?
Taking the analogy further, our friend could have walked into the forum,
listening for a while. Then he would have had a chance of overhearing
some expert telling someone else to go and get the "How To Tell What
Time It Is Now" pamphlet.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: 06 Apr 1998 12:48:39 -0400
From: Jay Rogers <jay@rgrs.com>
To: jc@eddie.mit.edu
Subject: Re: How to timeout TCP connect?
Message-Id: <82pviuj3q0.fsf@shell2.shore.net>
John Chambers <jc@ral1.zko.dec.com> writes:
> Any ideas? Is there a simple and elegant way to say "If that connection
> doesn't succeed in $N seconds, give up"?
Both IO::Socket::INET and Net::Telnet allow you to specify a timeout
when connecting. This capability doesn't work on a MS Win32 machine.
--
Jay Rogers
jay@rgrs.com
------------------------------
Date: Mon, 06 Apr 1998 15:18:38 GMT
From: John Porter <jdporter@min.net>
Subject: Re: If "=~" means match what is doesn't match?
Message-Id: <3528F3BA.A56@min.net>
Chocolate wrote:
>
> if($line =~ "Phone:") {
> [...]
> }
> I have tried to do:
> else {
> print THEFILE "\n";
> }
That else should have worked. Are you saying the else block
never executes?
Are you sure you have entries that don't have a phone number?
BTW, the opposite of =~ is !~. That's pretty basic stuff.
hth,
John Porter
------------------------------
Date: Mon, 06 Apr 1998 16:07:44 GMT
From: Bill Mooney <wmooney@voicenet.com>
To: Chocolate <poohba@io.com>
Subject: Re: If "=~" means match what is doesn't match?
Message-Id: <Pine.SUN.3.96.980406120517.13449A-100000@omni1>
I think your looking for !~ which returns true if the RE doesn't match
-Bill
------------------------------
Date: Mon, 06 Apr 1998 16:24:49 GMT
From: ron@farmworks.com (Ronald L. Parker)
Subject: Re: If "=~" means match what is doesn't match?
Message-Id: <352a00f3.12085728@10.0.2.33>
On Mon, 6 Apr 1998 07:44:21 -0500, Chocolate <poohba@io.com> wrote:
>Subject: If "=~" means match what is doesn't match?
I heard that a friend of a friend might have once been told about a
rumor that this information can be found in perlop, right next to
where =~ is documented. (It's !~)
I agree with Tom's assessment that the fall of modern man will be
preceded by the de-evolution of communications to the days of oral
tradition.
------------------------------
Date: Mon, 06 Apr 1998 10:25:11 -0600
From: sguna@hotmail.com
To: sguna@kaveri.sch.ge.com
Subject: Installation problems - HP-UX 11.00 -perl5.004_04
Message-Id: <6gas4r$fdk$1@nnrp1.dejanews.com>
Hi Everybody,
I am trying to install perl5.004_04 on C110 m/c
running HP-UX 11.00. Everything went on fine but when
i ran "make test" it failed on comp/cpp.t
I checked the script, it seems to be failing
in substitution. in comp/cpp.aux.
Does anybody faced such a situation?
Any suggestions?
TIA for any help...
Regs,
Guna
sguna@hotmail.com
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: 6 Apr 1998 08:32:48 -0700
From: snitty77@pacbell,net
Subject: Re: Is there a "Newsgroup" for Newbies to Perl?
Message-Id: <6gasj0$m8@co-op.newsguy.com>
In article <352868DC.A055D96C@coos.dartmouth.edu>, Ronald says...
>
>smitty77@pacbell.net wrote:
>>
>> >3) The posts are not bothersome because we respond to them. They're
>> >bothersome because they were posted. Not responding to them does not make
>> >them any less of a nuisance.
>>
>>I don't understand that at all. How can something be a nuisance if you ignore
>>it? So I assume you're all for another newsgroup for these nuisances to go to,
>> right?
>
>Because the message still takes up time and space being delivered. Because I
>still have to wait for my newsreader to download the message. Because I still
>have to read the message to find out if it is a worthwhile question.
>
>By the time I decide not to answer the question, it's already been a nuisance.
What a pile of crap. You're reaching, Ronald. This is a public forum. And
I'll repeat my question - I assume you're all for another newsgroup for these
nuisances to go to, right?
Dave
>--
> _ / ' _ / - aka - rjk@coos.dartmouth.edu
>( /)//)//)(//)/( Ronald J. Kimball chipmunk@m-net.arbornet.org
> / http://www.ziplink.net/~rjk/
> "It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Mon, 06 Apr 1998 08:52:19 GMT
From: lg@kt.dtu.dk (Lars Gregersen)
Subject: Re: Multidimensional hashes
Message-Id: <3528970f.6861134@130.228.3.8>
[posted and mailed]
On Thu, 02 Apr 1998 13:45:03 -0600, webmaster@dataplusnet.com wrote:
>Both of these lines of code generate the error. These are the exact lines
>from the script.
>Remarking these lines allows the program to operate normally.
>
>$multi_d_lastcode{"$line_1"}{"$i"} = $code_count;
>$recent_last = $multi_d_lastcode{$pm_block}{$pm_c};
Do you have a variable called $line_1 or are you trying to concatenate
$line with _1 ?
What line is it exactly that breaks your programme? What are the
values of your variables then?
Lars
Lars Gregersen, M.Sc., Chem. Engng.
Technical University of Denmark
Department of Chemical Engineering
E-mail : lg@kt.dtu.dk
Homepage: http://www.gbar.dtu.dk/~matlg/
------------------------------
Date: Mon, 06 Apr 1998 10:14:16 -0500
From: Tom Schneider <schneidh@msoe.edu>
Subject: Perl Arp Program
Message-Id: <3528F148.DC420D13@msoe.edu>
Hello, does anyone know how I could go about writing a perl program that
can do an ARP request
Thanks
Tom
------------------------------
Date: Mon, 06 Apr 1998 17:05:34 GMT
From: ron@farmworks.com (Ronald L. Parker)
Subject: Re: Perl code to generate MS Excel and Access files ?
Message-Id: <352b0493.13014003@10.0.2.33>
[posted and mailed]
On Mon, 06 Apr 1998 08:51:22 -0400, Michael Genovese
<mikeg@slpma8.ed.ray.com> wrote:
>I'm sure it's been done before, I just don't know where to find
>the appropriate file(s). I need to be able to take data I've
>already read in and write out the data in a format easily
>read into MS Excel and MS Access.
>
>
>I *could* write things out in a CSV file, but if there's a way to
>write out a barebone EXCEL and/or ACCESS file I'ld like to be able
>to do that.
>
>Anyone with any ideas ?
I don't know if this answers your question or not, but I've
successfully gotten data into an existing Access database using OLE
and DAO from Perl. This code assumes that you have a hash called
%Read containing data indexed by field name. It's not the most
efficient, but it works and it only needs to handle a few hundred
records a day, so it's good enough for me. It's certainly better than
running a script followed by a merge query from a linked CSV file, and
there's none of that wondering whether you remembered to run the merge
last time.
For information on extending this basic idea to work with Excel or to
do more with Access, see the documentation on the Excel and Access OLE
interfaces (in the appropriate online help) and the documentation that
comes with Win32::OLE.
You could also consider using the ODBC module for DBI. That's
probably the more supported way of doing things with databases, though
I doubt there's an ODBC driver for XLS files.
Note to appease Perl purists: This isn't perfect code. There's
hardly any error handling, for one thing. For another, there's no -w
flag or use strict. If you use this in a production environment,
consider doing it better.
-------- Cut here ----->8=======
use Win32::OLE;
$DBEngine = new Win32::OLE 'DAO.DBEngine' or die "no DBEngine";
$Workspace = $DBEngine->CreateWorkspace( $WorkspaceName,
$User, $Password );
$Database = $Workspace->OpenDatabase( $DatabaseName );
$Recordset = $Database->OpenRecordset( $TableName );
# I only add new records from emailed web forms. If you need to
# update existing records, you'll have to do more than this.
$Recordset->AddNew;
for (0..$Recordset->Fields->{'Count'}-1) {
$Field=$Recordset->Fields($_);
if ( defined $Read{$Field->Name} ) {
$Field->{'Value'}=$Read{$Field->Name};
}
else {
# All of my fields are text types. You might need something
# more complicated here, or you might be content to leave this
# field as AddNew created it (i.e. blank.)
$Field->{'Value'}=' ';
}
}
$Recordset->Update;
$Recordset->Close;
$Database->Close;
$Workspace->Close;
------------------------------
Date: 06 Apr 1998 13:09:39 +0200
From: Gisle Aas <aas@sn.no>
Subject: Re: Post - is lwp the only answer?
Message-Id: <m37m534364.fsf@furu.g.aas.no>
Marcia L Sussman <pi83@dial.pipex.com> writes:
> Sorry I was so vague -
> I have a search engine which will only accept POST data.
> I have a form for this on Yahoo, but they now tell me
> that they will only send out GET data.
> Therefore I need to write a Perl routine to take the incoming
> GET query string and send it to our database POST.
> I know that the lwp module will do this, but our host
> wont/can't let me install it...
>
> Any other ideas?
You just reimplement as much of LWP as you need to get the job done.
Starting with IO::Socket::INET this should not be too difficult unless
you really care about all the border cases or make it too general.
You can also install LWP in some private area then they just add a
"use lib" line to your scripts.
--
Gisle Aas
------------------------------
Date: Mon, 06 Apr 1998 12:18:59 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Post - is lwp the only answer?
Message-Id: <fl_aggie-0604981218590001@aggie.coaps.fsu.edu>
In article <8c90pjvyg2.fsf@gadget.cscaper.com>, Randal Schwartz
<merlyn@stonehenge.com> wrote:
+ And you *do* realize that you can install LWP in your own area -- it
+ doesn't need sysadmin assistance. Right?
Probably not. I know this is explicitly addressed in the CGI.pm
module, but might be a...hmmm...it _is_ a FAQ. Thought so... :)
How do I keep my own module/library directory? (perldoc perlfaq8)
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/CPAN-local/doc/FAQs/cgi/idiots-guide.html>
------------------------------
Date: Mon, 06 Apr 1998 12:11:25 -0600
From: ssharma@clearnet.com
Subject: readline in the debugger?
Message-Id: <6gb2bt$md3$1@nnrp1.dejanews.com>
Hello
I have no control over the perl installation at my site.
I installed ReadKey and ReadLine using PREFIX=
and I use the -I command line option to specify the
ReadKey and ReadLine modules.
When I put ReadLine=true in the ~/.perldb and run programs
with -d this is what I get:
Loading DB routines from perl5db.pl version 1.01
Emacs support available.
Enter h or `h h' for help.
Execution of ./get_1185 aborted due to compilation errors.
Cannot print stack trace, load with -MCarp option to see stack at
/usr/local/gnu/perl/lib/perl5db.pl line 1858.
DB::fake::(/usr/local/gnu/perl/lib/perl5db.pl:2083):
2083: "Debugged program terminated. Use `q' to quit or `R' to restart.";
DB<1>
and my perl version is
This is perl, version 5.004_04 built for PA-RISC1.1
How can I get readline working? Any help appreciated.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 06 Apr 1998 15:36:28 GMT
From: John Porter <jdporter@min.net>
Subject: Re: Ref Op in Context (was: Anon Scalar Expression)
Message-Id: <3528F7E9.22CA@min.net>
M.J.T. Guy wrote:
>
> In article <3524E7A9.53CB@min.net>, John Porter <jdporter@min.net> wrote:
> >
> >Now let's look at what's really going on here.
> > \($x,$y,$z)
> >is equivalent to
> > (\$x,\$y,\$z)
> >in every case. It is *not* dependent on context.
>
> That is currently the case, but it's a bug.
> \ is meant to evaluate its
> argument in the same context as it was called in.
> I believe this will be mended in 5.004_05.
>
> Note that \($x,$y,$z) will then be equivalent to ($x,$y,\$z) in a scalar
> context, but it's rather hard to tell the difference.
So what exactly is (will be) the difference? I can see that if the
results are discarded, it's inefficient to bother with taking the
references...
Is it that we want $x and $y, above, to be evaluated in list context,
even though $z might be getting scalar context? That would seem
very weird to me. Why would that be better?
John Porter
------------------------------
Date: 6 Apr 1998 15:11:12 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <6garag$anc$2@info.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 30 Mar 1998 14:01:43 GMT and ending at
06 Apr 1998 07:07:45 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" e-mail address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
Excluded Posters
================
perlfaq-suggestions\@mox\.perl\.com
Totals
======
Posters: 514
Articles: 1300 (487 with cutlined signatures)
Threads: 399
Volume generated: 2223.1 kb
- headers: 916.6 kb (17,971 lines)
- bodies: 1229.7 kb (37,367 lines)
- original: 847.3 kb (27,445 lines)
- signatures: 75.5 kb (1,535 lines)
Original Content Rating: 0.689
Averages
========
Posts per poster: 2.5
median: 1.0 post
mode: 1 post - 337 posters
s: 4.8 posts
Posts per thread: 3.3
median: 2 posts
mode: 1 post - 130 threads
s: 4.7 posts
Message size: 1751.1 bytes
- header: 722.0 bytes (13.8 lines)
- body: 968.7 bytes (28.7 lines)
- original: 667.4 bytes (21.1 lines)
- signature: 59.5 bytes (1.2 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
42 61.1 ( 33.8/ 22.4/ 13.2) Tom Phoenix <rootbeer@teleport.com>
42 57.4 ( 29.9/ 27.4/ 16.5) jdporter@min.net
33 47.0 ( 24.2/ 22.3/ 12.7) jgloudon@bbn.com
32 68.6 ( 26.5/ 33.6/ 15.8) rjk@coos.dartmouth.edu
29 48.2 ( 18.8/ 29.4/ 20.5) Gellyfish@btinternet.com
27 35.9 ( 16.7/ 17.6/ 12.8) Jonathan Feinberg <jdf@pobox.com>
26 40.3 ( 13.1/ 26.7/ 19.8) aml@world.std.com (Andrew M. Langmead)
24 37.7 ( 18.8/ 14.6/ 6.8) abigail@fnx.com
24 34.7 ( 20.4/ 14.2/ 5.7) Sneaker's Nest <sneaker@mediaone.net>
20 27.6 ( 11.0/ 16.5/ 7.7) mjtg@cus.cam.ac.uk (M.J.T. Guy)
These posters accounted for 23.0% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
68.6 ( 26.5/ 33.6/ 15.8) 32 rjk@coos.dartmouth.edu
61.1 ( 33.8/ 22.4/ 13.2) 42 Tom Phoenix <rootbeer@teleport.com>
57.4 ( 29.9/ 27.4/ 16.5) 42 jdporter@min.net
48.2 ( 18.8/ 29.4/ 20.5) 29 Gellyfish@btinternet.com
47.0 ( 24.2/ 22.3/ 12.7) 33 jgloudon@bbn.com
40.3 ( 13.1/ 26.7/ 19.8) 26 aml@world.std.com (Andrew M. Langmead)
40.2 ( 11.1/ 29.2/ 11.8) 12 david smith <smitty77@pacbell.net>
37.7 ( 18.8/ 14.6/ 6.8) 24 abigail@fnx.com
35.9 ( 16.7/ 17.6/ 12.8) 27 Jonathan Feinberg <jdf@pobox.com>
35.5 ( 10.6/ 24.9/ 14.8) 15 stanley@skyking.OCE.ORST.EDU (John Stanley)
These posters accounted for 21.2% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 1.3 / 1.3) 7 "Kelby Valenti" <kelby@mplx.com>
1.000 ( 4.7 / 4.7) 5 C.VOGEL@LINK-GOE.de (Chris Vogel)
0.993 ( 18.5 / 18.7) 11 fl_aggie@thepentagon.com (I R A Aggie)
0.986 ( 2.9 / 2.9) 5 gabor@vmunix.com (Gabor)
0.900 ( 6.6 / 7.3) 7 tchrist@mox.perl.com (Tom Christiansen)
0.835 ( 5.0 / 6.0) 7 smcdow@arlut.utexas.edu (Stuart McDow)
0.828 ( 5.7 / 6.9) 6 Jamie Hoglund <jhoglund@mirage.skypoint.net>
0.812 ( 14.3 / 17.6) 13 Greg Bacon <gbacon@cs.uah.edu>
0.789 ( 3.6 / 4.6) 7 "Grinch" <grinch@whoville.com>
0.753 ( 13.9 / 18.5) 8 lassehp@imv.aau.dk (Lasse =?ISO-8859-1?Q?Hiller=F8e?= Petersen)
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.466 ( 6.8 / 14.6) 24 abigail@fnx.com
0.465 ( 7.7 / 16.5) 20 mjtg@cus.cam.ac.uk (M.J.T. Guy)
0.431 ( 1.7 / 3.9) 8 Andrew Gierth <andrew@erlenstar.demon.co.uk>
0.419 ( 2.5 / 6.0) 5 keithmur@mindspring.com
0.418 ( 4.5 / 10.8) 10 alecler@cam.org (Andre L.)
0.404 ( 11.8 / 29.2) 12 david smith <smitty77@pacbell.net>
0.402 ( 5.7 / 14.2) 24 Sneaker's Nest <sneaker@mediaone.net>
0.394 ( 1.9 / 4.8) 6 Dan Boorstein <dboorstein@shopcfn.com>
0.384 ( 1.6 / 4.2) 7 Bob Trieger <sowmaster@juicepigs.com>
0.308 ( 1.6 / 5.2) 8 kpreid@ibm.net (Kevin Reid)
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
57 Is there a "Newsgroup" for Newbies to Perl?
23 The "Y2k-bugs-are-not-just-a-legacy-problem" FAQ
23 Someone put my munged e-mail address on a spam list
21 How do I strip newlines from a var
19 Odd or even function
19 contexts: is there such a thing as array?
17 Anon Scalar Expression (was: Evaluate expression inside print "")
15 how to count a list of comma sep. items
14 foreach loop & current element index
13 God Help Us All (was: Re: Sneex having problems)
These threads accounted for 17.0% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
151.4 ( 52.8/ 93.3/ 56.6) 57 Is there a "Newsgroup" for Newbies to Perl?
55.0 ( 16.2/ 36.1/ 19.3) 21 How do I strip newlines from a var
54.0 ( 19.0/ 33.9/ 20.4) 23 Someone put my munged e-mail address on a spam list
51.2 ( 23.0/ 27.2/ 12.3) 23 The "Y2k-bugs-are-not-just-a-legacy-problem" FAQ
37.8 ( 16.6/ 19.1/ 13.2) 19 contexts: is there such a thing as array?
26.8 ( 12.8/ 12.8/ 7.4) 19 Odd or even function
25.9 ( 2.3/ 22.8/ 20.1) 3 A problem for Perlxs or Perlxstut
24.8 ( 9.2/ 13.3/ 7.8) 11 verifying email address -- how?
24.4 ( 14.4/ 9.4/ 5.5) 17 Anon Scalar Expression (was: Evaluate expression inside print "")
22.9 ( 10.1/ 11.7/ 7.7) 11 Munging addresses (was: Re: Perl Cgi Questions)
These threads accounted for 21.3% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.891 ( 2.4/ 2.7) 9 undefine variables
0.847 ( 3.2/ 3.8) 5 Determining variable types
0.833 ( 3.6/ 4.3) 5 Date manipulations?
0.815 ( 5.3/ 6.5) 6 Public Key Encryption (non pgp)
0.814 ( 8.0/ 9.8) 10 [SOURCE] rot90: New and better MIME format
0.802 ( 9.9/ 12.4) 5 Tying a blessed hash (was: Re: Tie/bless vs. bless/tie and segmentation fault)
0.798 ( 12.9/ 16.1) 6 Need help with "shared memory" module IPC::Shareable !
0.792 ( 1.8/ 2.2) 5 Obfusticator
0.780 ( 1.5/ 1.9) 5 Conversion of Excel file to Text file
0.756 ( 2.1/ 2.7) 5 How to answer "is $this in @that"?
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.493 ( 1.8 / 3.6) 6 ANNOUNCE: /bin/sh to Perl translator finally available!
0.483 ( 1.8 / 3.7) 5 Sysadmin struggeling with PERL/Sed and etc...
0.482 ( 1.8 / 3.7) 6 chdir in UNIX: problem with the ~
0.479 ( 2.5 / 5.3) 7 newbie question:how to embed perl in html
0.471 ( 4.4 / 9.4) 9 Can perl open text files?
0.465 ( 3.7 / 8.0) 8 eval with text files
0.453 ( 12.3 / 27.2) 23 The "Y2k-bugs-are-not-just-a-legacy-problem" FAQ
0.437 ( 1.5 / 3.4) 6 Multidimensional Arrays
0.416 ( 1.8 / 4.4) 5 Position in Toronto & Question
0.413 ( 1.4 / 3.5) 8 help needed with grep type function for perl script.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
43 comp.lang.perl.modules
30 comp.lang.javascript
30 comp.object
25 comp.software-eng
23 comp.software.year-2000
22 microsoft.public.scripting.jscript
15 comp.lang.perl
10 de.comp.lang.perl
8 comp.os.linux.misc
8 comp.lang.tcl
Top 10 Crossposters
===================
Articles Address
-------- -------
16 laird@millennium.ecn.purdue.edu (Kyler Laird)
15 dpbsmith@world.std.com (Daniel P. B. Smith)
13 "Alex" <twrq@usa.net>
11 madings@earth.execpc.com (Steve Mading)
11 lvirden@cas.org
11 ranga@cs.umd.edu (M.Ranganathan)
11 JaMeZ <jnam@shrike.depaul.edu>
11 kaz@cafe.net
11 vaughan@itdc.edu (Tom Vaughan)
11 trwcolem@undergrad.math.uwaterloo.ca (Tim Coleman)
------------------------------
Date: Mon, 06 Apr 1998 12:11:49 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Why a FAQ is irritating (was Re: How do I strip newlines from a var)
Message-Id: <fl_aggie-0604981211490001@aggie.coaps.fsu.edu>
In article <8chg47vyrq.fsf_-_@gadget.cscaper.com>, Randal Schwartz
<merlyn@stonehenge.com> wrote:
+ Both of these are *clearly* stated netiquette. Or are you telling
+ me that people aren't even reading the operating manuals for *Usenet*
+ either, as posted in news.announce.newusers?
Randal, Randal, Randal...we _know_ they can't be bothered to look at
the fine documentation included with perl. What makes you think they'll
actually look at the manuals for Usenet or look at n.a.newusers?
+ classroom.) But I must draw the line for KLBs, that demonstrate their
+ laziness by the posting of a FAQ or off-topic question to CLPM. No.
+ Just say no.
Damn straight...
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/CPAN-local/doc/FAQs/cgi/idiots-guide.html>
------------------------------
Date: Mon, 06 Apr 1998 17:37:33 +0200
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: Why a FAQ is irritating (was Re: How do I strip newlines from a var)
Message-Id: <3528f6bd.524144494f47414741@radiogaga.harz.de>
Randal Schwartz (merlyn@stonehenge.com) wrote:
[...very good remarks snipped...]
: But I must draw the line for KLBs, that demonstrate their
: laziness by the posting of a FAQ or off-topic question to CLPM. No.
: Just say no.
I say, Amen.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
Ceterum censeo | work: mv@pdv-systeme.de
Redmondem delendam esse. | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: 6 Apr 1998 13:41:57 -0400
From: bryan@mail.hcst.com (Bryan Murphy)
Subject: Win32 and Perl Questions (a bit more advanced)
Message-Id: <6gb455$a92$1@alpha.hcst.com>
-----
Q#1
Ok, I've successfully compiled and linked the most recent version of
perl with my windows program (VC++ 5.0 MFC). I can run full scripts
beautifully! Quite pleasing, but I can't get individual sub routines
to execute.
Following the directions in the man pages (perlembed, perlcall,
perlguts, etc.) I setup my perl obect, allocated, call the approprate
functions, and Perl dies when I call the subroutine perl_call_argv
perl dies on me, with no messages, no errors, no exceptions. Nothing,
and it takes my program with it!!
Unfortunately, this is so bad I'm forced to install NT to be able to
debug Perl itself. Yay, what fun, but in the mean time... could any
body shed any light as to what's going on? I really am not doing any
thing vastly different than what the man page says as far as I can
tell. I'd provide code, but I'm at work and the code's at home :(
Ask and ye shall receive.
-----
Q#2
The ULTIMATE goal, is to use a perl script to parse relatively complex
files, and return the data to the C++ program. What steps do I need
to take to extract data from an Associative array that is returned by
the perl function? I can't find anything in the manual pages that
alludes to this.
What happens with an associative array of associative arrays?
i.e. $testdata{$test}{$questionnum} = $somevalue;
I can imagine this get's pretty hairy, but it has to be better than
writing all the C parsing code myself.
-----
Q#3
Finally, when linking to the perl LIB/DLL, when I add routines to
modify the Perl stack, as described in the perl man pages, VC
complains that these functions are undefined at link time!! Great.
Hopefully a full recompile in NT will solve this problem, hoepfully.
Thanks in advance for any help!
--
Bryan Murphy
Internet Applications Developer
------------------------------
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 2259
**************************************
