[9546] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 3141 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 13 13:07:39 1998

Date: Mon, 13 Jul 98 10:03:04 -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, 13 Jul 1998     Volume: 8 Number: 3141

Today's topics:
    Re: sending mail from within perl <newsonly@usa.net>
        Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
        string / [] <Adam.K@idnet.de>
    Re: Urgent!! Need Programmer for perm in Malibu, Ca (Andy Lester)
    Re: What's the substitute for #! /usr/bin/perl in Win32 scott@softbase.com
    Re: Why is Dave operating here? (was Re: REPOST: Re: ) (John Stanley)
    Re: Why is Dave operating here? (was Re: REPOST: Re: ) (The Sonny Bono Internet Tribute Committee)
        Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Mon, 13 Jul 1998 15:32:55 GMT
From: "Bob L." <newsonly@usa.net>
Subject: Re: sending mail from within perl
Message-Id: <HMpq1.553$8F3.1785828@proxye1.nycap.rr.com>

Hi:

I tried to use it but I get "Document Contains No Data".  I looked in the
Perl directory and found other Net:  types but not SMTP.  Do I have to get
the SMTP module?  I was told it would be part of Perl.  I'm using the latest
version from activestate.

Thanks for your help.

Bob

Mr. Ozette Brown <ozette@imaginative-creations.com> wrote in message
35A93858.7A4C0BCF@imaginative-creations.com...
>Hello,
>
>I've used Net::Smtp under Win95 and it works just fine.
>
>Good luck,
>
>Ozette
>
>Jim Babbington wrote:
>
>> try Net::smtp. I use it under NT, never tried it under 95.
>>
>> Good luck,
>>
>> Jim
>
>
>
>--
>Mr. Ozette J. Brown   <President>
>Imaginative Creations <webmaster@imaginative-creations.com>
>A Website Development and Consulting Company.
>http://www.imaginative-creations.com
>
>




------------------------------

Date: 13 Jul 1998 16:09:30 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <6odbfq$bve$3@info.uah.edu>

Following is a summary of articles spanning a 7 day period,
beginning at 06 Jul 1998 15:55:51 GMT and ending at
13 Jul 1998 06:48:17 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.
    - 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\@mox\.perl\.com

Totals
======

Posters:  584
Articles: 1672 (742 with cutlined signatures)
Threads:  482
Volume generated: 2884.8 kb
    - headers:    1198.6 kb (23,227 lines)
    - bodies:     1547.5 kb (47,108 lines)
    - original:   1068.0 kb (34,724 lines)
    - signatures: 137.1 kb (2,676 lines)

Original Content Rating: 0.690

Averages
========

Posts per poster: 2.9
    median: 1.0 post
    mode:   1 post - 364 posters
    s:      6.4 posts
Posts per thread: 3.5
    median: 2.0 posts
    mode:   1 post - 165 threads
    s:      6.6 posts
Message size: 1766.8 bytes
    - header:     734.0 bytes (13.9 lines)
    - body:       947.8 bytes (28.2 lines)
    - original:   654.1 bytes (20.8 lines)
    - signature:  84.0 bytes (1.6 lines)

Top 10 Posters by Number of Posts
=================================

         (kb)   (kb)  (kb)  (kb)
Posts  Volume (  hdr/ body/ orig)  Address
-----  --------------------------  -------

   72   129.5 ( 52.6/ 58.6/ 34.5)  comdog@computerdog.com (brian d foy)
   58    91.9 ( 46.8/ 39.2/ 29.7)  tchrist@mox.perl.com (Tom Christiansen)
   51    96.5 ( 43.5/ 45.7/ 20.9)  abigail@fnx.com
   51    88.1 ( 35.8/ 47.3/ 27.8)  lr@hpl.hp.com (Larry Rosler)
   37    71.0 ( 26.9/ 36.5/ 25.0)  mgjv@comdyn.com.au (Martien Verbruggen)
   35    54.1 ( 23.1/ 30.9/ 21.8)  cberry@cinenet.net (Craig Berry)
   32    49.9 ( 23.3/ 21.8/ 15.1)  "F.Quednau" <quednauf@nortel.co.uk>
   29    49.4 ( 23.9/ 18.1/  9.2)  rjk@coos.dartmouth.edu (Ronald J Kimball)
   24    37.4 ( 16.2/ 21.2/ 10.8)  Gellyfish@btinternet.com (Jonathan Stowe)
   24    45.1 ( 15.1/ 30.0/ 19.1)  tadmc@flash.net (Tad McClellan)

These posters accounted for 24.7% of all articles.

Top 10 Posters by Volume
========================

  (kb)   (kb)  (kb)  (kb)
Volume (  hdr/ body/ orig)  Posts  Address
--------------------------  -----  -------

 129.5 ( 52.6/ 58.6/ 34.5)     72  comdog@computerdog.com (brian d foy)
  96.5 ( 43.5/ 45.7/ 20.9)     51  abigail@fnx.com
  91.9 ( 46.8/ 39.2/ 29.7)     58  tchrist@mox.perl.com (Tom Christiansen)
  88.1 ( 35.8/ 47.3/ 27.8)     51  lr@hpl.hp.com (Larry Rosler)
  71.0 ( 26.9/ 36.5/ 25.0)     37  mgjv@comdyn.com.au (Martien Verbruggen)
  54.1 ( 23.1/ 30.9/ 21.8)     35  cberry@cinenet.net (Craig Berry)
  49.9 ( 23.3/ 21.8/ 15.1)     32  "F.Quednau" <quednauf@nortel.co.uk>
  49.4 ( 23.9/ 18.1/  9.2)     29  rjk@coos.dartmouth.edu (Ronald J Kimball)
  49.0 ( 16.6/ 27.7/ 15.6)     19  Lloyd Zusman <ljz@asfast.com>
  47.3 ( 17.8/ 20.9/ 13.0)     23  Randal Schwartz <merlyn@stonehenge.com>

These posters accounted for 25.2% of the total volume.

Top 10 Posters by OCR (minimum of five posts)
==============================================

         (kb)    (kb)
OCR      orig /  body  Posts  Address
-----  --------------  -----  -------

0.992  ( 14.1 / 14.2)     12  tye@fohnix.metronet.com (Tye McQueen)
0.989  ( 15.0 / 15.2)     19  fl_aggie@thepentagon.com (I R A Aggie)
0.986  (  4.5 /  4.6)      6  dwiesel@my-dejanews.com
0.973  (  9.3 /  9.5)     10  gebis@albrecht.ecn.purdue.edu (Michael J Gebis)
0.953  (  1.5 /  1.5)      7  "Guillermo Garcis" <ggarces@arrakis.es>
0.953  ( 15.5 / 16.3)      5  Greg Bacon <gbacon@cs.uah.edu>
0.950  (  2.4 /  2.6)      5  groenvel@cse.psu.edu (John D Groenveld)
0.895  (  3.0 /  3.3)      5  jevon@my-dejanews.com
0.878  ( 17.1 / 19.5)     10  Nathan Torkington <gnat@frii.com>
0.821  (  6.3 /  7.7)      8  scott@softbase.com

Bottom 10 Posters by OCR (minimum of five posts)
=================================================

         (kb)    (kb)
OCR      orig /  body  Posts  Address
-----  --------------  -----  -------

0.498  (  3.6 /  7.2)     13  jzawodn@wcnet.org
0.486  (  2.4 /  5.0)      6  sitaram@diac.com (Sitaram Chamarty)
0.480  (  2.6 /  5.4)      6  Jan Krynicky <JKRY3025@comenius.ms.mff.cuni.cz>
0.474  (  4.0 /  8.4)      7  Gisle Aas <aas@sn.no>
0.474  (  2.3 /  4.9)      5  alecler@cam.org (Andre L.)
0.458  ( 20.9 / 45.7)     51  abigail@fnx.com
0.445  (  1.6 /  3.5)      6  Marc.Haber-usenet@gmx.de (Marc Haber)
0.440  (  2.9 /  6.7)      7  "Simon Fairey" <simonf@conduit.co.uk>
0.283  (  2.1 /  7.5)      7  maierc@chesco.com
0.251  (  1.0 /  4.0)      5  "Teflon" <indy@NOSPAMdemobuilder.com>

61 posters (10%) had at least five posts.

Top 10 Threads by Number of Posts
=================================

Posts  Subject
-----  -------

   93  -w on production code (was Re: better way of getting the last modified file?)
   72  new charter and moderator for comp.lang.perl.announce
   33  Deutsche Boerse sucht 100 neue Mitarbeiter im IT-Bereich
   22  Getting Yesterday's Date
   20  Oh man, DO I love Perl ! (References to things that go out of scope)
   18  Weirdness in trying to extract year from localtime
   17  tough regexp - help needed
   17  question about objects
   16  NEVER "call warn() and return undef" (Re: question about objects)
   16  Do I understand this?

These threads accounted for 19.4% of all articles.

Top 10 Threads by Volume
========================

  (kb)   (kb)  (kb)  (kb)
Volume (  hdr/ body/ orig)  Posts  Subject
--------------------------  -----  -------

 197.5 ( 83.9/ 98.6/ 60.9)     93  -w on production code (was Re: better way of getting the last modified file?)
 142.9 ( 54.6/ 77.0/ 50.6)     72  new charter and moderator for comp.lang.perl.announce
  71.4 ( 36.7/ 33.0/ 20.1)     33  Deutsche Boerse sucht 100 neue Mitarbeiter im IT-Bereich
  43.7 ( 17.3/ 24.7/ 16.1)     20  Oh man, DO I love Perl ! (References to things that go out of scope)
  37.4 ( 15.5/ 18.9/ 12.6)     22  Getting Yesterday's Date
  34.8 ( 11.3/ 21.7/ 12.1)     15  Do we need lame msgs in discussions? Re : Martien Verbruggen
  32.7 ( 11.9/ 20.6/ 13.3)     14  HELP: Internet Database Design questions...
  30.7 ( 13.7/ 15.1/ 11.2)     17  question about objects
  30.2 ( 12.3/ 13.9/ 11.6)      9  REPOST: Re: I am an "antispam spammer"?
  29.5 ( 12.9/ 15.4/  8.7)     17  tough regexp - help needed

These threads accounted for 22.6% of the total volume.

Top 10 Threads by OCR (minimum of five posts)
==============================================

         (kb)    (kb)
OCR      orig /  body  Posts  Subject
-----  --------------  -----  -------

0.899  (  1.9/   2.1)      5  how long does it take to execute some code?
0.848  (  8.1/   9.6)      6  PUZZLE: make hat, take ham
0.836  ( 11.6/  13.9)      9  REPOST: Re: I am an "antispam spammer"?
0.819  (  2.6/   3.2)      5  How to use 'system ("...")' on WIN32.
0.812  (  6.3/   7.7)      8  DB_File in the real world.
0.762  (  8.3/  10.8)      9  How can you encrypt a CGI script on a server so it will not get "stolen"?
0.760  (  2.5/   3.2)      5  Simple (?) Perl maths question
0.755  (  3.0/   4.0)      5  pattern matching results into an array
0.753  (  3.2/   4.2)      8  y2k
0.744  (  6.5/   8.7)      8  open2 problems

Bottom 10 Threads by OCR (minimum of five posts)
=================================================

         (kb)    (kb)
OCR      orig /  body  Posts  Subject
-----  --------------  -----  -------

0.489  (  2.0 /  4.0)      7  Character  entity for <space>?
0.482  (  1.5 /  3.2)      7  Removing the ^M character
0.467  (  5.8 / 12.4)      9  Choosing DBMS: friendly to Linux, Apache, Perl, Java
0.465  (  1.2 /  2.6)      5  Get IP Address for Server Name
0.438  (  1.7 /  4.0)      5  s/,/','/;
0.436  (  1.5 /  3.3)      5  How to get files in a directory?
0.377  (  1.5 /  4.0)      6  any way to measure sub-seconds? was Re: how long does it take to execute some code?
0.377  (  2.8 /  7.3)      6  Abigail - Another Question for you.
0.368  (  1.5 /  4.1)      5  \Q and \E
0.335  (  2.8 /  8.4)     10  regexp s/// for removing tail end of string

89 threads (18%) had at least five posts.

Top 10 Targets for Crossposts
=============================

Articles  Newsgroup
--------  ---------

      56  comp.lang.perl.modules
      36  comp.infosystems.www.authoring.html
      33  bln.markt.arbeit
      33  at.anzeigen.arbeitsmarkt
      33  de.comp.lang.java
      33  de.markt.arbeit.d
      33  de.comp.lang.c++
      33  de.comp.lang.c
      33  de.comp.lang.perl
      32  de.comm.isdn.computer

Top 10 Crossposters
===================

Articles  Address
--------  -------

      45  Oliver Bandel <oliver@first.in-berlin.de>
      27  stolze@paxp01.mipool.uni-jena.de (Knut Stolze)
      27  "Stephan Roder (infoware GmbH)" <roder@odars.de>
      26  lr@hpl.hp.com (Larry Rosler)
      18  Chris Huebsch <chu@informatik.tu-chemnitz.de>
      18  uz@musoftware.com
      14  root.noharvest.\@not_even\here.com
      10  "Manfred Schneider" <manfred.schneider@rhein-neckar.de>
       9  frederik@remote.org (Frederik Ramm)
       9  Ulf Wendel <ulf.wendel@airbrush-zeitung.de>


------------------------------

Date: Mon, 13 Jul 1998 17:31:39 +0200
From: Adam Kopacz <Adam.K@idnet.de>
Subject: string / []
Message-Id: <r89do6.5r1.ln@news.kLo.de>

hi,

i have a problem with a string in a cgi =>

($TYPE = $ENV{'HTTP_USER_AGENT'});
$word = "\Q$TYPE";
 .
    BLOCK: {
       $recall = 0;
       while (<FILE>) {
         /$word/io && last BLOCK;       #word exists->get out
         $recall = tell(FILE);          #remember where hit was
        }
 .

why this don't work ? my $word isn't found in FILE :(
i have also tried /$_word/io and so.. 

$TYPE can be something like : bla/3.98 [xyz]; (8282.9292)
and perl5 has problms with the [] :(
with \Q this should work but it didn't :((
and with \Q the output looks ugly <g> this would be ok but maybe there
is a better answer ?

-- 
Adam Kopacz - http://www.idnet.de/~AdamK - ICQ# 257499


------------------------------

Date: 13 Jul 1998 16:27:22 GMT
From: petdance@maxx.mc.net (Andy Lester)
Subject: Re: Urgent!! Need Programmer for perm in Malibu, Ca
Message-Id: <6odcha$j66$1@supernews.com>

: We need a programmer learned in C, C++, Java, Active X, and ASP
: for a perm position in Malibu, Ca.  Good Salary.

If you're looking for a perm position, I don't understand why you need all
the computer stuff.

Why not post to alt.jobs.hairdressers?

xoxo,
Andy

--
-- 
Andy Lester:        <andy@petdance.com>       http://tezcat.com/~andy/
Chicago Shows List: <shows@ChicagoMusic.com>  http://ChicagoMusic.com/



------------------------------

Date: 13 Jul 1998 15:07:57 GMT
From: scott@softbase.com
Subject: Re: What's the substitute for #! /usr/bin/perl in Win32 Perl?
Message-Id: <6od7sd$3ut$1@mainsrv.main.nc.us>

> I'm using the ActiveState Win32 Perl on an NT 4.0 system... what do I
> use in place of the first line (#! /usr/bin/perl) in Unix versions of
> the script ?

You don't. NT doesn't support this "magic number" style of
execution. 

You either:

	1. Just type "perl whatever.pl" on the command line. This is
           the best solution.
	2. Go through the rigamarole to create a batch file
	   that runs the perl script -- tools are included with 
	   the distribution (if I remember right, I never use this)
	3. Associate .pl with perl.exe and run it from Explorer.
	   This is a bad, bad, bad, bad, bad idea since Perl
	   is command-line oriented and you will likely just
	   see a command prompt window flash on the screen and
           not know what happened.

If you are trying to run a CGI Perl program, get and install the ISAPI
version of Perl. The command line Perl doesn't work with IIS or PWS.
(If it does, getting it to work wouldn't be worth the hassle. I've
never gotten it to work in 2-3 years.) The ISAPI version of Perl
automatically installs a handler for .pl files *in the web server*, so
a URL like http://whatever/scripts/foo.pl automatically runs the ISAPI
DLL.

Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more. 


------------------------------

Date: 13 Jul 1998 16:08:37 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Why is Dave operating here? (was Re: REPOST: Re: )
Message-Id: <6odbe5$7hv$1@news.NERO.NET>

In article <6ocbqa$31g$1@client3.news.psi.net>,
Abigail <abigail@fnx.com> wrote:
>++ When was the charter for this newsgroup changed to invite Dave? I don't
>++ recall any discussion asking for Dave's "help", and do not appreciate
>++ losing the ability to cancel my own articles.
>
>Since when do we invite people? 

Oh, Abigail. Do I read your question at face value and think you don't
know what Dave is, or is your question disengenuous? Do you really not
know that Dave is a program and not a person?

>And what makes you think you lose the
>ability to cancel your own articles?

Do you really not know how Dave works?

>To me, it looks like Dave is resurrecting rogue cancels. Unless you have
>the conception that all articles are yours and you should have the ability
>to cancel them all, I don't there's anything Dave is preventing you to do.

Except that when Dave controls a group, you don't get to cancel your own
articles, either. 



------------------------------

Date: Mon, 13 Jul 1998 16:07:27 GMT
From: sonny-lives-in-our-hearts@IDONTLIKESPAMjuno.com (The Sonny Bono Internet Tribute Committee)
Subject: Re: Why is Dave operating here? (was Re: REPOST: Re: )
Message-Id: <35aa3018.85819594@news.op.net>

On 13 Jul 1998 07:08:58 GMT, abigail@fnx.com (Abigail) wrote:

>John Stanley (stanley@skyking.OCE.ORST.EDU) wrote on MDCCLXXVII September
>MCMXCIII in <URL: news:6oc0bi$3cd$1@news.NERO.NET>:
>++ X-Reposted-By: dave@ferret.ocunix.on.ca
>++ 
>++ When was the charter for this newsgroup changed to invite Dave? I don't
>++ recall any discussion asking for Dave's "help", and do not appreciate
>++ losing the ability to cancel my own articles.
>
>Since when do we invite people? And what makes you think you lose the
>ability to cancel your own articles?

It's probably because in the newsgroups Dave regularly patrols (the
only ones I'm aware of are in news.admin.net-abuse.*), Dave resurrects
*all* cancelled articles as a defense against rogue cancels.  Hence,
one can't easily cancel one's own posts.  Mr. Stanley probably wasn't
aware that Dave's presence in this group is simply a temporary
measure.

--
The opinions of this poster do not necessarily reflect the
views of the Sonny Bono Internet Tribute Committee.


------------------------------

Date: 12 Jul 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 Mar 98)
Message-Id: <null>


Administrivia:

Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.

If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu. 


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 3141
**************************************

home help back first fref pref prev next nref lref last post