[16526] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 3938 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 7 14:15:56 2000

Date: Mon, 7 Aug 2000 11:15:32 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <965672132-v9-i3938@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Mon, 7 Aug 2000     Volume: 9 Number: 3938

Today's topics:
        Perl CGI parameters in the URL? moldovanyi@my-deja.com
    Re: Perl CGI parameters in the URL? <daniel@blackomega.com>
        Perl on Windows - how to keep the window <RCVP10@email.sps.mot.com>
    Re: Perl on Windows - how to keep the window <mauldin@netstorm.net>
    Re: pipe STDERR (Abigail)
    Re: Please help me! <mauldin@netstorm.net>
    Re: Please help me! (Mark Wright)
    Re: Please help me! nobull@mail.com
    Re: Please help me! <mjcarman@home.com>
    Re: Please help me! <Allan@due.net>
    Re: Problem w/anchored match <lr@hpl.hp.com>
        problem with 'mail' module chameleon@photographer.net
    Re: problem with 'mail' module nobull@mail.com
    Re: Programming Ethics <jeff@yoak.com>
    Re: reg expressions - protect html <godzilla@stomp.stomp.tokyo>
        Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
        Still doesn't work... moldovanyi@my-deja.com
    Re: Tk module for Windows NT (Arek P)
    Re: totally newbie to perl, I ... <juex@deja.com>
        uploading file <rbank@csf.edu>
    Re: use in subroutines (Andrew J. Perrin)
    Re: use in subroutines nobull@mail.com
    Re: web based emails <jeff@yoak.com>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: Mon, 07 Aug 2000 15:42:54 GMT
From: moldovanyi@my-deja.com
Subject: Perl CGI parameters in the URL?
Message-Id: <8mmldu$68p$1@nnrp1.deja.com>

I would like to create a link to a cgi script
including "command line parameters". I
thougth the way to do this is:
<href source"scipt.cgi?name=value"> , but it
does not work.  I also tried to replace the '?'
with '#', but it did not help.  In the script,
$name = $cgi->param('name')
is always empty.
So how should I create my link and how
shoud I read the paramters in the script
passed in the URL?
I really read all the FAQs at perl.com and could
not find an answer. Please help...

Thank you,
-Balazs


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Mon, 7 Aug 2000 17:08:34 +0100
From: "Daniel Foster" <daniel@blackomega.com>
Subject: Re: Perl CGI parameters in the URL?
Message-Id: <8mmmtk$9h4$1@newsg4.svr.pol.co.uk>

> I would like to create a link to a cgi script
> including "command line parameters". I
> thougth the way to do this is:
> <href source"scipt.cgi?name=value"> , but it
> does not work.

Try using this:
<a href="script.cgi?name=value">
making sure script.cgi is in a directory that CGI can be executed
from.  For instance if it's in /cgi-bin, the anchor would need to be
<a href="/cgi-bin/script.cgi?name=value">

>I also tried to replace the '?'
> with '#', but it did not help.  In the script,
> $name = $cgi->param('name')
> is always empty.

This is fine so long as you've created $cgi as a CGI object with
$cgi = nee CGI;

---
'Drinking decaffeinated coffee is like breathing air
without oxygen'                                 - Anna, This Life

Daniel Foster - daniel@blackomega.com





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

Date: Mon, 07 Aug 2000 10:08:43 -0700
From: Eric Titmas <RCVP10@email.sps.mot.com>
Subject: Perl on Windows - how to keep the window
Message-Id: <398EED1B.B2407334@email.sps.mot.com>

I wrote a little perl program on my PC yesterday
and it worked fine.

My problem was the DOS window that perl ran in
disappeared as soon as the program completed -
I couldn't read the terminal output.

How do I get the window to stay up? (I worked around
this by having the program read a line from the terminal.)
-- 
Eric Titmas      eric.titmas@mot.com

Perl is designed to make the easy jobs easy,
without making the hard jobs impossible.
  Programming Perl by Wall, Christiansen, Schwartz


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

Date: Mon, 07 Aug 2000 17:48:49 GMT
From: Jim Mauldin <mauldin@netstorm.net>
Subject: Re: Perl on Windows - how to keep the window
Message-Id: <398EF601.824561F8@netstorm.net>

Eric Titmas wrote:
> 
> How do I get the window to stay up?

Open a DOS window

	Start -> Programs -> MS-DOS Prompt

change to the directory your script is in (or set DOS window Properties
-> Working to the directory you want), and then execute it from the
command line like so:

	perl scriptname

Or get PFE from http://www.lancs.ac.uk/people/cpaap/pfe/ which allows
you to execute your script from within PFE and returns output in one of
its own windows.

-- Jim


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

Date: 07 Aug 2000 15:44:28 GMT
From: abigail@foad.org (Abigail)
Subject: Re: pipe STDERR
Message-Id: <slrn8otma9.st1.abigail@alexandra.foad.org>

haggi@work (haggi@tappe.net) wrote on MMDXXXIII September MCMXCIII in
<URL:news:398E64FB.29662277@tappe.net>:
@@ 
@@ then I analyze the output of the program, but is there a way to catch the
@@ standard error too?


use IPC::Open3, but be aware.



Abigail
-- 
perl -wlpe '}{$_=$.' file  # Count the number of lines.


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

Date: Mon, 07 Aug 2000 15:32:32 GMT
From: Jim Mauldin <mauldin@netstorm.net>
Subject: Re: Please help me!
Message-Id: <398ED60E.53CE4BC3@netstorm.net>

Mark wrote:
> 
> but if i use:
> print "$test";
> and i want the output should be: 0
> (it means that the $test should contain the value of $var1)

In the above statement I assume you mean that $test should contain a
reference to $var1 (if you want $test to contain the _value_ of $var1
use an assignment).

This is covered nicely in
perldoc perlref

$var1 = 'This is some stuff in $var1';
$test = \$var1;	# store a reference to $var1 in $test
print $$test;	# dereference the reference to $var1 in $test

BTW, your post is off-topic for comp.lang.perl.modules.

-- Jim


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

Date: Mon, 07 Aug 2000 16:16:01 GMT
From: mark@giallo.demon.nul (Mark Wright)
Subject: Re: Please help me!
Message-Id: <398fe098.608097@194.159.73.10>

One joyful day (Mon, 07 Aug 2000 22:52:54 +0800 to be precise), Mark
<mark325@hotmail.com> decided that the Usenet community would benefit
from this remarkable comment:

>I have below code segment:
>-----------------------
>$var1 = 0;
>$i=1;
>
>$test = "\$var" . "$i";
>-----------------------
>
>if i use:
>print "$var1";
>the output should be: 0
>
>if i use:
>print "$test";
>the output should be: $var1
>
>but if i use:
>print "$test";
>and i want the output should be: 0
>(it means that the $test should contain the value of $var1)
>does anyone know how to implement it?

eval may come in useful.

Mark Wright
- mark@giallo.demon.nl
--
perl -e "print join' '=>map{$_ if s/(\w*)(.)ay/\U$2\E$1/}grep/^\w/=>reverse qw+ackerhay :o( erlpay :o| notheraay :o\ ustjay :o)+"


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

Date: 07 Aug 2000 17:37:47 +0100
From: nobull@mail.com
Subject: Re: Please help me!
Message-Id: <u93dkhuiw4.fsf@wcl-l.bham.ac.uk>

Mark <mark325@hotmail.com> writes:

> Subject: Please help me!

Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.

    http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post

Also you should read a newsgroup before you post.

This question has bee asked a few times... a week for as long as I've
been reading this group.

Please get it into your head that placing a much higher value your
time more than ours is very rude.

> Newsgroups: comp.lang.perl.misc,comp.lang.perl.modules

What does this have to do with modules?

Crossposting to irrelevant newsgroups to increase your exposure is
rude. OK it's not as rude as multi-posting but it is still rude. 

Please don't plead ignorance.  The rudeness of these actions can be
determined from first principles - you should not need to be told that
they are rude.

> Hi all,

You may wish to avoid this.  Most people who start their posts with
"friendly" greatings like this go on to insult the group.  

> I have below code segment:
> -----------------------
> $var1 = 0;
> $i=1;
> 
> $test = "\$var" . "$i";

Note: this is more simply written written as:

  $test = "\$var$i";


> -----------------------
> 
> if i use:
> print "$var1";

Note: this is more simply written written as:

  print $var1;

> the output should be: 0
> 
> if i use:
> print "$test";
> the output should be: $var1

Yes.

> but if i use:
> print "$test";
> and i want the output should be: 0
> (it means that the $test should contain the value of $var1)

You do not mean that.  You mean you want to print out the the result
of evaluating the expression in $test.

print eval $test;

But I don't think that's really what you wanted to ask. I think you
really wanted to ask about sybolic refs:
 
  $var1 = 0;
  $i=1;
 
  $test = "var$i";

  print $$test;

> does anyone know how to implement it?

Avoid getting into the situation.  Never use sybolic references or
eval(EXPR) unless there is no better way.  In most cases the better
way is to use hashes, or arrays or hard references.

-- 
     \\   ( )
  .  _\\__[oo
 .__/  \\ /\@
 .  l___\\
  # ll  l\\
 ###LL  LL\\


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

Date: Mon, 07 Aug 2000 10:52:46 -0500
From: Michael Carman <mjcarman@home.com>
Subject: Re: Please help me!
Message-Id: <398EDB4E.3B674ACD@home.com>

[comp.lang.perl.modules removed from Cc list as this is not topical
there.]

Mark wrote:
> 
> $var1 = 0;
> $i=1;
> 
> $test = "\$var" . "$i";

What you are trying to do is called soft (symbolic) references. You
almost certainly don't need them. They're slower, munge the global
symbol table, and don't work under 'strict'. The general consensus here
is that you should never use symrefs unless (1) You know *why* you
shouldn't use them, and (2) You know that you *need* to. Hard references
are far preferred:

$var1 = 0;
$test = \$var1;

print $$test;

I'm guessing that you want to have $var1, $var2, etc. If that's the
case, why not use an array? If you tell us what you're trying to do, we
can probably show you a better way.

-mjc


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

Date: Mon, 7 Aug 2000 13:44:20 -0400
From: "Allan M. Due" <Allan@due.net>
Subject: Re: Please help me!
Message-Id: <8mmsii$l7v$1@slb7.atl.mindspring.net>

<nobull@mail.com> wrote in message news:u93dkhuiw4.fsf@wcl-l.bham.ac.uk...
: Mark <mark325@hotmail.com> writes:
[snip]

: > Hi all,
: You may wish to avoid this.  Most people who start their posts with
: "friendly" greatings like this go on to insult the group.

Huh, that is a new one to me.  I don't really see a need to encourage people
to be less friendly, but maybe that is just me.  Do folks actually use that as
a scoring rule?

AmD
--
$email{'Allan M. Due'} = ' All@n.Due.net ';
--random quote --
An old pond-
The sound of the water
When the frog jumps in
 - Basho




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

Date: Mon, 7 Aug 2000 10:41:32 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Problem w/anchored match
Message-Id: <MPG.13f894a75c26208598ac3b@nntp.hpl.hp.com>

In article <m3ya2b3ydw.fsf@C654771-a.frmt1.sfba.home.com> on Sun, 06 Aug 
2000 02:40:44 GMT, Prasanth A. Kumar <kumar1@home.com> says...

 ...

> What about /^\d\d\d-\d\d\d\d.*$/ which will match anything starting
> with a phone number followed by optional name or other stuff. You can
> also shorten that down to /^\d{3}-\d{4}.*$/ if you like.

The specifier .*$ at the end of a regex is superfluous.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


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

Date: Mon, 07 Aug 2000 15:08:22 GMT
From: chameleon@photographer.net
Subject: problem with 'mail' module
Message-Id: <398ecec5.59740552@news.vt.edu>

I know- the mail module is supposed to be simple- tho I think my perl
inxperience is what's killing me here.
My goal is for this script to take stdin [from a sql program] to email
someone.
I believe my problem is I don't know how to get the stdin part done
right.  syntactically the to => part needs single quotes... and this
is where i become a perl idiot...  the standard in does not have the
quotes, and even if it does it still pukes
Many TIA
-Jeremy

#!/usr/local/bin/perl
use Mail::Sendmail;

$mailrecipient <STDIN>;
$mailrecipient = "'" . $mailrecipient . "\@foo.com'";
  #the above line is obviously wrong....

%mail = (To => $mailrecipient,
         Cc => 'foobar@foo.com',
         Subject => 'Your request to has been received',
         From => 'chameleon@vt.edu',
         Message => "Thank you for filling out blah blah...
Your login ID is foo and your password is bar."
        );
sendmail(%mail) or die $Mail::Sendmail::error;


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

Date: 07 Aug 2000 17:50:47 +0100
From: nobull@mail.com
Subject: Re: problem with 'mail' module
Message-Id: <u9vgxdt3q0.fsf@wcl-l.bham.ac.uk>

chameleon@photographer.net writes:

> $mailrecipient <STDIN>;

'=' missing from assignment statment!?

> $mailrecipient = "'" . $mailrecipient . "\@foo.com'";
>   #the above line is obviously wrong....

So remove it.  I think you wanted:

  $mailrecipient .= '@foo.com';


-- 
     \\   ( )
  .  _\\__[oo
 .__/  \\ /\@
 .  l___\\
  # ll  l\\
 ###LL  LL\\


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

Date: Mon, 07 Aug 2000 12:11:04 -0800
From: "Jeff Yoak" <jeff@yoak.com>
Subject: Re: Programming Ethics
Message-Id: <8mmqlp0194p@news1.newsguy.com>


[posted and mailed]

In article <MPG.13f4fc172760ecaa98ac38@nntp.hpl.hp.com>, Larry Rosler
<lr@hpl.hp.com> wrote:
> This is a question of ethics, not of the Perl programming language.  
> Surely there is a more appropriate newsgroup for you to post your 
> question to.

I can't argue that this is untrue, but I'm happy to see this discussion
here.  Here is my arguably bad reason:

The signal / noise ratio here is rounding area.  And most of the off-topic
and FAQ stuff is so galactically uninteresting that it makes many wonder
if it is worth coming here ar all.  At least this is interesting, and
given Perl's power and flexability it is probably more called upon for
evil than any other language.  Many of the readers here have no doubt been
placed in this situation.  I have.

Let's let this thread slide.  Killfile it with a smile if you will.  :-)

Cheers, Jeff



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

Date: Mon, 07 Aug 2000 09:41:41 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: reg expressions - protect html
Message-Id: <398EE6C5.5CD1B2FF@stomp.stomp.tokyo>

Wyzelli wrote:
 
> Godzilla! wrote:
> > Godzilla! wrote:

> > > > > Ðo it Godzilla §chizo §tyle!

> Try this, lots less hopping around arrays, and it doesn't 
> matter how many tags are within the <HTML> sections.  Also 
> nothing to 'do and then undo'.

Kinda fun isn't it, this writing code to do something
experts proclaim you can only do with a module. I learn
more about programming by writing code, then finding my
bugs and mistakes, fixing them, than I do or would by
copy and paste of a module reference. 

My presumption is you have exhaustively tested this
code and it works just fine, sans module. Only style
difference I would note and, this is just a personal
style notion, I would not use warnings nor strict.
Both slow your program down and bloat memory usage.
No real need for those in a program this simple.

Perhaps on your ' or die ' I would change this to
if (!($input)) .. flush the filehandle .. open (IN ..
and try for a second opening, then die if a second
try failed.

If I wrote code again, for this task, I would try
for code which simply substrings and substitutes
in situ, and not even worry about html tags other
than their relative numerical position in a string.

Good to read there is at least one other who can
write code to do what others claim only a module
can do.

Godzilla !



Wyzelli wrote:

(snippage)

> #Usage : perl test.pl path/filetoreadandconvert path/convertedfiletowrite


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

Date: Mon, 07 Aug 2000 16:12:55 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <soto07or63a92@corp.supernews.com>

Following is a summary of articles spanning a 7 day period,
beginning at 31 Jul 2000 17:16:04 GMT and ending at
07 Aug 2000 16:24:38 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) 2000 Greg Bacon.
      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:  547
Articles: 1895 (689 with cutlined signatures)
Threads:  458
Volume generated: 3317.9 kb
    - headers:    1522.5 kb (29,901 lines)
    - bodies:     1710.0 kb (57,173 lines)
    - original:   1052.5 kb (38,367 lines)
    - signatures: 83.5 kb (2,070 lines)

Original Content Rating: 0.616

Averages
========

Posts per poster: 3.5
    median: 1 post
    mode:   1 post - 290 posters
    s:      6.9 posts
Posts per thread: 4.1
    median: 3.0 posts
    mode:   1 post - 111 threads
    s:      4.8 posts
Message size: 1792.9 bytes
    - header:     822.7 bytes (15.8 lines)
    - body:       924.0 bytes (30.2 lines)
    - original:   568.7 bytes (20.2 lines)
    - signature:  45.1 bytes (1.1 lines)

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

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

   74   119.3 ( 65.4/ 46.5/ 19.8)  Jonathan Stowe <gellyfish@gellyfish.com>
   46    75.9 ( 34.0/ 34.2/ 30.8)  abigail@foad.org
   46    65.7 ( 33.9/ 29.6/ 13.8)  Keith Calvert Ivey <kcivey@cpcug.org>
   43    63.0 ( 25.3/ 32.4/ 17.2)  Greg Bacon <gbacon@cs.uah.edu>
   43    75.6 ( 29.2/ 41.4/ 22.5)  Larry Rosler <lr@hpl.hp.com>
   43   110.7 ( 40.2/ 69.3/ 51.8)  "Godzilla!" <godzilla@stomp.stomp.tokyo>
   39    59.2 ( 35.1/ 23.7/ 14.4)  Bart Lateur <bart.lateur@skynet.be>
   36    46.5 ( 29.8/ 16.7/  6.9)  Drew Simonis <care227@attglobal.net>
   36    53.2 ( 27.1/ 23.4/ 13.8)  nobull@mail.com
   34    57.1 ( 29.3/ 26.4/ 11.4)  jason <elephant@squirrelgroup.com>

These posters accounted for 23.2% of all articles.

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

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

 119.3 ( 65.4/ 46.5/ 19.8)     74  Jonathan Stowe <gellyfish@gellyfish.com>
 110.7 ( 40.2/ 69.3/ 51.8)     43  "Godzilla!" <godzilla@stomp.stomp.tokyo>
  75.9 ( 34.0/ 34.2/ 30.8)     46  abigail@foad.org
  75.6 ( 29.2/ 41.4/ 22.5)     43  Larry Rosler <lr@hpl.hp.com>
  65.7 ( 33.9/ 29.6/ 13.8)     46  Keith Calvert Ivey <kcivey@cpcug.org>
  63.0 ( 25.3/ 32.4/ 17.2)     43  Greg Bacon <gbacon@cs.uah.edu>
  59.2 ( 35.1/ 23.7/ 14.4)     39  Bart Lateur <bart.lateur@skynet.be>
  58.5 ( 21.9/ 36.6/ 25.2)     31  Logan Shaw <logan@cs.utexas.edu>
  57.1 ( 29.3/ 26.4/ 11.4)     34  jason <elephant@squirrelgroup.com>
  53.2 ( 27.1/ 23.4/ 13.8)     36  nobull@mail.com

These posters accounted for 22.3% of the total volume.

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

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

1.000  (  3.2 /  3.2)      6  Rashid Saharudin <rashid1218@hotmail.com>
1.000  (  3.0 /  3.0)      7  hugo.b@derivs.com
0.990  (  3.0 /  3.1)      5  "Robert Lee" <robert99@maine.rr.nodamnspam.com>
0.921  (  4.2 /  4.6)      5  RS @ <rschram@reed.edu>
0.908  (  6.6 /  7.2)      5  Cyber Thief <fake@address.com>
0.899  ( 30.8 / 34.2)     46  abigail@foad.org
0.895  (  7.3 /  8.1)      5  tarheel@sierratel.com
0.863  ( 11.9 / 13.8)      6  Damian Conway <damian@cs.monash.edu.au>
0.789  (  9.0 / 11.4)      7  "Godzilla!" <callgirl@la.znet.com>
0.785  ( 21.9 / 27.8)     19  Colin Keith <newsgroups@ckeith.clara.net>

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

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

0.397  (  4.0 / 10.1)     11  "Alex T." <samara_biz@hotmail.com>
0.397  (  6.5 / 16.5)     16  "Robin Bank" <rbank@csf.edu>
0.387  (  4.9 / 12.8)     14  Uri Guttman <uri@sysarch.com>
0.378  (  1.4 /  3.8)      5  ericr@yankthechain.com
0.377  (  1.5 /  3.9)      5  Jonathan.L.Ericson@jpl.nasa.gov
0.359  (  3.3 /  9.3)     15  Rafael Garcia-Suarez <rgarciasuarez@free.fr>
0.344  (  4.9 / 14.1)     13  Ilja Tabachnik <billy@arnis-bsl.com>
0.338  (  2.0 /  5.8)      5  "Ryan Tarpine" <rtarpine@hotmail.com>
0.317  (  2.3 /  7.2)      6  John Fortin <fortinj@attglobal.net>
0.259  (  3.1 / 12.0)      5  jthornton@my-deja.com

79 posters (14%) had at least five posts.

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

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

   51  very cool routine
   46  splitting on spaces
   31  Syntax Question
   27  bug in localtime()???
   27  Removing newline chars
   19  combining hashes
   18  A DOS box question
   18  Perl Module in C - Question.
   17  find the number of characters in a string
   17  Gee, thanks for all the help  :-(

These threads accounted for 14.3% of all articles.

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

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

  93.9 ( 40.2/ 52.1/ 22.3)     46  splitting on spaces
  87.0 ( 43.5/ 41.6/ 20.5)     51  very cool routine
  61.4 ( 23.4/ 35.9/ 19.6)     31  Syntax Question
  53.2 ( 24.1/ 27.9/ 15.8)     27  Removing newline chars
  52.1 ( 13.5/ 38.1/ 25.7)     15  How to open and append to a file
  42.9 ( 23.3/ 18.4/ 10.0)     27  bug in localtime()???
  33.1 ( 15.4/ 17.6/ 12.0)     14  Impossible RegEx Problem
  32.5 ( 14.6/ 16.6/  8.2)     18  Perl Module in C - Question.
  32.1 ( 12.9/ 18.7/ 12.0)     17  Gee, thanks for all the help  :-(
  30.6 ( 15.9/ 12.5/  7.3)     19  combining hashes

These threads accounted for 15.6% of the total volume.

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

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

0.870  (  5.7/   6.5)      5  Security (with respect to chmod) - user_create.cgi [0/1]
0.830  ( 10.2/  12.3)      9  reg expressions - protect html
0.827  (  1.9/   2.2)      6  Directory mover
0.827  (  8.3/  10.1)      8  5.005 to 5.6.0 migration- need help with some problems
0.824  (  4.0/   4.9)      5  Someone please explain the 'my' declaration.
0.824  (  4.6/   5.6)      5  When does it pay to presize an array?
0.804  (  5.0/   6.3)      5  a simple question
0.800  (  1.2/   1.5)      5  How do I parse "file0001" into 2 parts?
0.793  (  7.7/   9.7)      7  Stumped Again!
0.790  (  9.4/  11.9)      5  Dynamic String to hash

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

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

0.407  (  1.0 /  2.5)      6  Regexp problem
0.405  (  0.8 /  2.1)      6  Using symbolic references to call methods decided at run-time.
0.389  (  1.5 /  3.9)      6  Is "exit()" really necessary?
0.385  (  1.3 /  3.3)      5  How to print the thousands comma for financial numbers ( $ 12,8292.75)
0.332  (  1.3 /  3.8)      5  killing process
0.319  (  2.3 /  7.1)      8  DBI:: UPDATE format (Perl DBI O'Reilly fails to explain properly)
0.317  (  2.8 /  8.9)      9  #include-type-of-thing-in-Perl
0.316  (  3.1 /  9.7)      6  passing spaces in URL
0.311  (  1.5 /  4.9)      6  Upload File???
0.237  (  3.9 / 16.3)      5  SendMail.pm

135 threads (29%) had at least five posts.

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

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

      37  alt.perl
      16  comp.lang.perl.modules
      12  comp.lang.perl
       9  comp.editors
       8  comp.lang.javascript
       4  de.comp.lang.perl.cgi
       3  comp.lang.java.help
       3  alt.comp.perlcgi.freelance
       3  it.comp.lang.perl
       2  comp.answers

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

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

       7  "Jeffrey R. Bailey" <bailey12@concentric.net>
       5  "Roland Corbet" <Roland@psychenet.co.uk>
       4  "GS" <pleaseREPLYtotheGROUP@notrealdomain.com>
       4  abigail@foad.org
       4  David H. Adler <dha@panix.com>
       4  "Kenny Lim" <kennylim@techie.net>
       3  No User <no.user@anon.xg.nu>
       3  Bart Lateur <bart.lateur@skynet.be>
       3  Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
       3  brian d foy <brian@smithrenaud.com>


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

Date: Mon, 07 Aug 2000 16:35:30 GMT
From: moldovanyi@my-deja.com
Subject: Still doesn't work...
Message-Id: <8mmogj$8pa$1@nnrp1.deja.com>



> Try using this:
> <a href="script.cgi?name=value">
> making sure script.cgi is in a directory that CGI can be executed
> from.
I did just that (I forgot the "<A"  only in my original post, not in the
html file) and the cgi is definitly executing, and I try to
print "Parameter: $name" , it outputs just "Parameter:".

> > $name = $cgi->param('name')
>
> This is fine so long as you've created $cgi as a CGI object with
> $cgi = nee CGI;
Yes, I did so.


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Mon,  7 Aug 2000 12:28:18 EDT
From: Arek@nospam._pietruszewski_.com (Arek P)
Subject: Re: Tk module for Windows NT
Message-Id: <8mmo32$17gb$1@earth.superlink.net>

On Wed, 02 Aug 2000 19:11:15 GMT, gopal_bhat@my-deja.com wrote:

In addition to what others have said, I had a problem installing TK on
5.006.  I am not sure, but I think that it was said somewhere that PPM
was buggy b4. I suggest that You get 5.6 and then PPM should work for
You. After U download and unzip the package, cd into Your download
directory and 
PPM install Tk

here is Tk and other zips, for  ActiveStatePerl 5.6 

http://www.activestate.com/PPMPackages/5.6/zips/

HTH,
			ArkadiuszP
>Hi,
>	I got Active-Perl(5.006) for WinNT and I wanted to install Tk module
>(perl -e 'use Tk'  should work forst). Please post a reply to this
>posting if any of you know a place on the net, where I can download
>compiled Tk module for Win NT.
>thanks
>
>
>Sent via Deja.com http://www.deja.com/
>Before you buy.



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

Date: Mon, 7 Aug 2000 10:55:29 -0700
From: "Jürgen Exner" <juex@deja.com>
Subject: Re: totally newbie to perl, I ...
Message-Id: <398ef812$1@news.microsoft.com>

"ken" <kensplace@comport.com> wrote in message
news:8mm6p1$ufn$1@newsg1.svr.pol.co.uk...
> seb wrote in message <8mlra9$4rs$1@buty.wanadoo.nl>...
>
> >totally newbie to perl, I would like 2 know what do I need to run my
first
> >perl script
> >(you know, something like ' Hello World ! '  ;-)) )
> >under W 9x (is it possible ? ) or W 2k.

> If running locally, on w9x then you need a web server of some kind, i use

Bullshit

> You also need perl itself, I use Activeperl, available from
> http://www.activestate.com/

That's the only thing you need (plus a text editor).

> and tell it where your cgi-bin directory is.

And why would you need that?

> save the following script as a .pl
>
> A simple hello world script is shown below
>
> #!/usr/local/bin/perl
> # Hello world example program
>
> print ("Content-type: text/html\n\n");
> print "Hello World !";
>
>
> Note the first line contains the location of the perl interpreter, it must
> start with #!

The shebang line will be ignored on Windows.

> And then fire up omni and your browser,
> and use the url [...]

What is wrong with simply typing "perl myfile.pl" (assuming the file was
saved as myfile.pl)?

jue





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

Date: Mon, 7 Aug 2000 10:28:00 -0600
From: "Robin Bank" <rbank@csf.edu>
Subject: uploading file
Message-Id: <8mmnve$6u0$1@reader.nmix.net>

I need to upload two pictures with a cgi script via a form.

Can someone point me in the right direction as to good modules/methods to
use for this.

Thanks,

--
<  Robin Bank  >
{  Web Design / Programming  }
[ Internet @ Cybermesa ] [ www.cybermesa.com ] [ 505 - 988 - 9200 ]




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

Date: 07 Aug 2000 11:07:18 -0400
From: aperrin@demog.berkeley.edu (Andrew J. Perrin)
Subject: Re: use in subroutines
Message-Id: <u8zu9hzyx.fsf@demog.berkeley.edu>

Kostis <ke77le@my-deja.com> writes:

> Hi.

Hi.

> 
> Does anyone know, if:
> 

Yup, someone does.

[snip]
> 
> Or do 'use' directives only get processed at 'compile' time irrespective
> of where they appear?
> 

Yes, use directives only get processed at compile time, regardless of
where they appear in the script.  Only exception (that i know of) is
within eval statements.

-- 
----------------------------------------------------------------------
Andrew Perrin - Solaris-Linux-NT-Samba-Perl-Access-Postgres Consulting
       aperrin@igc.apc.org - http://demog.berkeley.edu/~aperrin
----------------------------------------------------------------------


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

Date: 07 Aug 2000 17:47:16 +0100
From: nobull@mail.com
To: Kostis <ke77le@my-deja.com>
Subject: Re: use in subroutines
Message-Id: <u9zompt3vv.fsf@wcl-l.bham.ac.uk>

Kostis <ke77le@my-deja.com> writes:

>  ... do 'use' directives only get processed at 'compile' time irrespective
> of where they appear?

This is answered in the obvious place: perldoc -f use

If you have questions about a given Perl builting function it's easier
for you (and a lot cheaper in terms of the global Perl user
communities human resources) to check the manual entry for that
function rather than post a long question to Usenet.

BTW: the answer is "yes".

-- 
     \\   ( )
  .  _\\__[oo
 .__/  \\ /\@
 .  l___\\
  # ll  l\\
 ###LL  LL\\


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

Date: Mon, 07 Aug 2000 11:47:41 -0800
From: "Jeff Yoak" <jeff@yoak.com>
Subject: Re: web based emails
Message-Id: <8mmp9u0kok@news2.newsguy.com>


[posted and mailed]

In article <8mips7$stj$1@informer1.cis.McMaster.CA>, "Gilly"
<trbovidd@mcmaster.ca> wrote:
> Hi everyone, I have been working on my own parser of emails for our
> system (our own little version of procmail, if you will) and it is
> accepting mails originating from our machine and in school, yet mails
> from hotmail, yahoo, etc are not coming in.  Does someone here know how
> these emails are formatted? ie do they have different headers that other
> emails? I have a regular expression in perl set up to search for the
> line containing "To: ". Much thanks for your time and assistance in
> this.

Hi there.  If you are doing filtering of incoming mail with Perl, you
might look at Mail::Audit.  It is discussed in the most recent issue of
The Perl Journal and seems to be mega-spiffy.  I plan to hack with it a
bit later on today.

Good luck!

Cheers,
Jeff






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

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


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