[17204] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 4616 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 14 14:05:44 2000

Date: Sat, 14 Oct 2000 11:05:10 -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: <971546709-v9-i4616@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Sat, 14 Oct 2000     Volume: 9 Number: 4616

Today's topics:
    Re: [Q] "pass along" in AUTOLOAD ? <kj0@mailcity.com>
        A Simpler perlish way <Jodyman@usa.net>
    Re: A Simpler perlish way <anders@wall.alweb.dk>
    Re: A Simpler perlish way <godzilla@stomp.stomp.tokyo>
    Re: A Simpler perlish way (Mark-Jason Dominus)
        array of an array? fg19537@my-deja.com
    Re: array of an array? (Mark-Jason Dominus)
    Re: Compiling Locally <was Why these 2 simple errors?> (BUCK NAKED1)
    Re: Compiling Locally <was Why these 2 simple errors?> <uri@sysarch.com>
    Re: cookies blocked by "location"? <nospam@david-steuber.com>
    Re: How do I cut out a certain number of characters of  <stphw@ihug.com.au>
    Re: How do I cut out a certain number of characters of  <admin@salvador.venice.ca.us>
        How do I cut out a certain number of characters of a sc <andreas@maunz.de>
    Re: How do I cut out a certain number of characters of  <Jodyman@usa.net>
    Re: Need Urgent help on File reading <anders@wall.alweb.dk>
    Re: Newbie: Reading a COOKIE ?! <admin@salvador.venice.ca.us>
        Perl - form interaction <davidh@dcs.rhbnc.ac.uk>
    Re: Problem on apache web server <christopher_j@uswest.net>
    Re: question <admin@salvador.venice.ca.us>
    Re: question <godzilla@stomp.stomp.tokyo>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: 14 Oct 2000 13:57:27 -0400
From: kj0 <kj0@mailcity.com>
Subject: Re: [Q] "pass along" in AUTOLOAD ?
Message-Id: <8sa6q7$h7o$1@panix3.panix.com>
Keywords: carpenter, contemporary, phenol, tell

In <39e7f5ad.5fcf$7f@news.op.net> mjd@plover.com (Mark-Jason Dominus) writes:

>* As I mentioned in a different article, the original request makes no
>  sense, since the poster wants AUTOLOAD to pass control to a method
>  which, had it actually existed, would have prevented AUTOLOAD from
>  being called in the first place.

OK, perhaps it'll make more sense if I describe this AUTOLOAD more
fully.  I'm using AUTOLOAD to define get/set methods for object
attributes.  AUTOLOAD knows which are the valid, user-accessible
attributes, and complains (by design) if the value of $AUTOLOAD is not
one of these attributes.  In particular, it complains when DESTROY is
called, for example, which is no good.  I want AUTOLOAD to detect
calls such as these and pass them along to a parent class
(e.g. UNIVERSAL).





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

Date: Sat, 14 Oct 2000 11:39:20 -0400
From: "Jody Fedor" <Jodyman@usa.net>
Subject: A Simpler perlish way
Message-Id: <8s9utn$3f5$1@plonk.apk.net>

I've written the following Julian Date routine:

#!/usr/bin/perl
$localtime = localtime();

$yr = substr($localtime, 20, 4);
$date = substr($localtime, 8, 2);
$month = substr($localtime, 4, 3);
$days="MonTueWedThuFriSatSun";
$months="JanFebMarAprMayJunJulAugSepOctNovDec";
@days = (31,28,31,30,31,30,31,31,30,31,30,31);
if ($yr%4 == 0) {$days[1] = 29} else {$days[1] = 28};
$mo = ((index($months,$month)+3)/3)-1;

$jd = $date;
&julian;

print "Today's Julian Date is: $jd\n";

sub julian {

 for ($i=0; $i < $mo; $i++)
  {$jd = ($jd + $days[$i])}
 }


Any Perl Guru pointers or a better way?




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

Date: Sat, 14 Oct 2000 19:18:44 +0200
From: Anders Lund <anders@wall.alweb.dk>
Subject: Re: A Simpler perlish way
Message-Id: <HA0G5.866$Uy5.63549@news000.worldonline.dk>

Jody Fedor wrote:

> I've written the following Julian Date routine:

(bla bla)

> Any Perl Guru pointers or a better way?

"Don't reinvent the wheel"

perldoc -q julian
will advice you to direct your attention to your favourite CPAN and install 
Time::Julian

-anders 

-- 
[ the word wall - and the trailing dot - in my email address
is my _fire_wall - protecting me from the criminals abusing usenet]


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

Date: Sat, 14 Oct 2000 10:34:14 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: A Simpler perlish way
Message-Id: <39E89916.19837918@stomp.stomp.tokyo>

Anders Lund wrote:

> > I've written the following Julian Date routine:
 
> (bla bla)
 
> > Any Perl Guru pointers or a better way?
 
> "Don't reinvent the wheel"
 
> perldoc -q julian
> will advice you to direct your attention to your 
> favourite CPAN and install Time::Julian
 

Up until quite recently, in a historical sense, bullet wounds
were treated by digging out a bullet from a wound using a Bowie
knife often heated over a campfire or the likes. A bullet wound
was most often sterilized with cheap whiskey, which also served
as an anesthesia for a bullet wound victim.

To our better health and better piece of mind, intelligent people
very often work at reinventing the wheel and, just as often are
quite successful. This is commonly called progress.

I am one of those who looks at a wheel and thinks,

"There is probably a better way to do this."


This is a better attitude than jumping into a rut
and burying yourself with Cargo Cult ignorance.


Godzilla!
-- 
Dr. Kiralynne Schilitubi ¦ Cooling Fan Specialist
UofD: University of Duh! ¦ ENIAC Hard Wiring Pro
BumScrew, South of Egypt ¦ HTML Programming Class


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

Date: Sat, 14 Oct 2000 17:44:19 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: A Simpler perlish way
Message-Id: <39e89b72.3db$3dc@news.op.net>

In article <8s9utn$3f5$1@plonk.apk.net>, Jody Fedor <Jodyman@usa.net> wrote:
>I've written the following Julian Date routine:

Try this instead:

        $jd = (localtime())[7];

That's all that is necessary.

Here's a hint: Never use any Perl built-in function, such as
'localtime', wuthout looking it up in the online documentation first.
If Perl is properly installed on your system, try the command

        perldoc -f localtime

If that doesn't work, do a web search for 'perlfunc'.



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

Date: Sat, 14 Oct 2000 17:05:29 GMT
From: fg19537@my-deja.com
To: m.cambray@worldnet.att.net
Subject: array of an array?
Message-Id: <8sa3om$rad$1@nnrp1.deja.com>

Without checking for previous and current values, and
not wanting to perform multiple queries, I’m having a
brain cramp trying to get an array from an existing
array. Should I try to get ‘slices’ of the array?

Any help will be appreciated.

#!/home/tools/bin/perl

use DBI;
$dbh = DBI->connect("DBI:Informix:pro");
$sth = $dbh->prepare(q%select   name, color, seq from abc
                       order by name, color, seq);
$sth->execute();
$ref = $sth->fetchall_arrayref();
$dbh->disconnect;

for $row (@$ref) {
   $name = $$row[0]; $color = $$row[1]; $seq = $$row[2];
   push(@fullarray, $color . " " . $name . " " . $seq);
}


Above gives me the loaded array depicted below.

dave blue 1
dave blue 2
dave red  1
dave red  2
pete pink 1
bart blue 1
bart blue 2

I’d like to load them into their own arrays depicted below.

dave blue 1
dave blue 2
   do process . . .
dave red  1
dave red  2
   do process . . .
pete pink 1
   do process . . .
bart blue 1
bart blue 2


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


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

Date: Sat, 14 Oct 2000 17:53:47 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: array of an array?
Message-Id: <39e89daa.420$23e@news.op.net>
Keywords: Euphrates, McGee, electroencephalography, lengthy


In article <8sa3om$rad$1@nnrp1.deja.com>,
 <michael.cambray@wellpoint.com> wrote:
>#!/home/tools/bin/perl
>
>use DBI;
>$dbh = DBI->connect("DBI:Informix:pro");
>$sth = $dbh->prepare(q%select   name, color, seq from abc
>                       order by name, color, seq);
>$sth->execute();
>$ref = $sth->fetchall_arrayref();
>$dbh->disconnect;
>
>for $row (@$ref) {
>   $name = $$row[0]; $color = $$row[1]; $seq = $$row[2];
>   push(@fullarray, $color . " " . $name . " " . $seq);
>}
>
>
>I’d like to load them into their own arrays depicted below.

It seems that you want to separate the data into groups where all the
items in each group have the same name and color.

Try this:

for ($row) (@$ref) {
  my ($name, $color, $seq) = @$row;
  my $key = "$name $color";
  push @{$items{$key}}, $row;
}


Now, what's going on here?  Suppose the row has "dave blue 1".
We use "dave blue" as a hash key in the hash %items, and store the
entire row in the hash under that key.  Later, when we see "dave blue
2", we store it under the same key.

Eventually, we have all the dave blue rows stored in the %items hash
under the key "dave blue", all the bart pink rows stored under the key
"bart pink", and so on.  Now we can get the data back out again using code
like this:

        while (($key, $allrows) = each %items) {
          # we are now processing a new group of rows
          # that is, all the rows with a certain key, such as "dave blue"
          foreach $row (@$allrows) {
            # we are now processing just one of those rows
          }
          # We have finished processing all the rows in the current group
        }


If you're unclear on the use of reference here, or the way the hash of
arrays works, you may want to see
http://www.plover.com/~mjd/perl/FAQs/References.html, which discusses
a similar example in more detail.

By the way, in place of this:

>   push(@fullarray, $color . " " . $name . " " . $seq);

I would have used this instead:

    push(@fullarray, "$color $name $seq");

It means the same, but most people will probably find it easier to read.



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

Date: Sat, 14 Oct 2000 11:03:49 -0500 (CDT)
From: dennis100@webtv.net (BUCK NAKED1)
Subject: Re: Compiling Locally <was Why these 2 simple errors?>
Message-Id: <23584-39E883E5-1@storefull-246.iap.bryant.webtv.net>

I'm very grateful for your help. Thanks for setting me straight on those
2 things. Obviously, I need Compress::Zlib, so I may as well just use it
to do the task, and forget Archive::Tar since Zlib appears to do
extracting by itself.

The problem is that I don't have root access and Compress::Zlib needs to
be compiled. Is there a way to compile without root access? or to use
Compress:Zlib locally without root access on a Unix Apache webserver?

My perl Makefile.PL PREFIX=/modules/Compress-Zlib-1.08
works fine. But "make" and "make install" give me permission denied
errors.

Best to all,
Dennis





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

Date: Sat, 14 Oct 2000 16:34:33 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Compiling Locally <was Why these 2 simple errors?>
Message-Id: <x7vguvv0ti.fsf@home.sysarch.com>

>>>>> "BN" == BUCK NAKED1 <dennis100@webtv.net> writes:

  BN> I'm very grateful for your help. Thanks for setting me straight on those
  BN> 2 things. Obviously, I need Compress::Zlib, so I may as well just use it
  BN> to do the task, and forget Archive::Tar since Zlib appears to do
  BN> extracting by itself.

compression and tar are separate operations. no one program truly does
both as each can be done without the other. the zlib docs do not mention
tar anywhere i can find.

  BN> The problem is that I don't have root access and Compress::Zlib needs to
  BN> be compiled. Is there a way to compile without root access? or to use
  BN> Compress:Zlib locally without root access on a Unix Apache webserver?

  BN> My perl Makefile.PL PREFIX=/modules/Compress-Zlib-1.08
  BN> works fine. But "make" and "make install" give me permission denied
  BN> errors.

you can compile as any user. but installing in the standard perl lib
dirs amy be restricted by your admins. but, there are several ways
around it and the faq covers some of it. you can do a proper install to
any location you want with options to the Makefile.PM script. so create
a lib dir you own and install there. then add that path to @INC with us
lib which you know already.

another method not documented but can be better is to install your own
complete perl. i did that as my virtual host supplies a lousy version of
perl and i wanted control over modules. once i built and installed perl
in /home/uri/{bin,lib}/perl and prepended /home/uri/bin to my PATH, then
all module installs worked automatically. so by doing that main install
once, i simplified all later module installs and got complete control of
my perl on a shared virtual host. i just run all my scripts with the
proper #! line there. i even made that path work at my dev box at home
with a symlink so i don't have to change it. only my cgi scripts use
that path.

uri

-- 
Uri Guttman  ---------  uri@sysarch.com  ----------  http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page  -----------  http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net  ----------  http://www.northernlight.com


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

Date: Sat, 14 Oct 2000 17:32:09 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: cookies blocked by "location"?
Message-Id: <m3u2af8h2p.fsf@solo.david-steuber.com>

I'm not sure what the Perl question is here.

Cookies are only sent back to the server that sets them.  They do not
follow a redirect.

The other system should be setting a cookie based on the URL you
redirected too.  Otherwise, only the click through will be recorded,
not any subsequent activity.

-- 
David Steuber | Perl apprentice, Apache/mod_perl user,
NRA Member    | and general Internet web wannabe.
ICQ# 91465842
***         http://www.david-steuber.com/          ***


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

Date: Sun, 15 Oct 2000 02:30:29 +1000
From: Neo James Crum <stphw@ihug.com.au>
Subject: Re: How do I cut out a certain number of characters of a scalar  variable?
Message-Id: <39E88A25.B1AA3FE0@ihug.com.au>

Andreas Maunz wrote:
> 
> Hi you pros!
> 
> Please give me a hint:
> 
> I got a scalar variable (such as $text) and I want to extract the first
> x characters out of it and store them in another variable.
> Seems simple doesn't it? But not for me :-)

Look at substring documentation.

Neo.

--
We wouldn't care so much what people thought of us if we knew how seldom
they did.
SJW: http://www.ozemail.com.au/~stphw


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

Date: Sat, 14 Oct 2000 09:04:10 -0700
From: Pan <admin@salvador.venice.ca.us>
Subject: Re: How do I cut out a certain number of characters of a scalar  variable?
Message-Id: <39E883FA.D4B9EDD4@salvador.venice.ca.us>



Andreas Maunz wrote:
> 
> Hi you pros!
> 
> Please give me a hint:
> 
> I got a scalar variable (such as $text) and I want to extract the first
> x characters out of it and store them in another variable.
> Seems simple doesn't it? But not for me :-)

perldoc -f substr

-- 
Pan
admin@salvador.venice.ca.us
http://www.la-online.com


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

Date: Sat, 14 Oct 2000 15:08:11 GMT
From: Andreas Maunz <andreas@maunz.de>
Subject: How do I cut out a certain number of characters of a scalar variable?
Message-Id: <8s9ssp$m99$1@nnrp1.deja.com>

Hi you pros!

Please give me a hint:

I got a scalar variable (such as $text) and I want to extract the first
x characters out of it and store them in another variable.
Seems simple doesn't it? But not for me :-)

Thank you!

--
"Vergangenheit und Zukunft sind in Wahrheit nichts weiter als
geschickte Täuschung"
-Albert Einstein


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


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

Date: Sat, 14 Oct 2000 12:01:19 -0400
From: "Jody Fedor" <Jodyman@usa.net>
Subject: Re: How do I cut out a certain number of characters of a scalar variable?
Message-Id: <8sa06u$444$1@plonk.apk.net>


Andreas Maunz wrote in message <8s9ssp$m99$1@nnrp1.deja.com>...
>Hi you pros!
>
>Please give me a hint:
>

Here is an example:

BTW: $localtime = Sat Oct 14 11:32:53 2000


#!/usr/bin/perl
$localtime = localtime();

$yr = substr($localtime, 20, 4);   # this would give the Year 2000
$date = substr($localtime, 8, 2); # this would give the date 14
$month = substr($localtime, 4, 3); # this would give the month Oct

HTH

Jody





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

Date: Sat, 14 Oct 2000 18:00:03 +0200
From: Anders Lund <anders@wall.alweb.dk>
Subject: Re: Need Urgent help on File reading
Message-Id: <Xq%F5.832$Uy5.62055@news000.worldonline.dk>

Bart Lateur wrote:

> Anders Lund wrote:
> 
> >I think you should buy a good perl book, like "Learning Perl" by Randolph
> >Schwartz.
> 
> Is that one or two L's in Randolph?
> 

sorry sorry sorry..
Please Randal excuse me!

-anders

-- 
[ the word wall - and the trailing dot - in my email address
is my _fire_wall - protecting me from the criminals abusing usenet]


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

Date: Sat, 14 Oct 2000 09:02:41 -0700
From: Pan <admin@salvador.venice.ca.us>
Subject: Re: Newbie: Reading a COOKIE ?!
Message-Id: <39E883A1.BED3A284@salvador.venice.ca.us>



Julien Stokkink wrote:
> 
> Hello,
> 
> can anyone tell me how to read a cookie ?
> This is my code for writing the cookie:


>     %cookies = fetch CGI::Cookie;
>     $id = $cookies{'lovecarrousel'}->value;

# get rid of the previous 2 lines and replace them with this:

$id = cookie('lovecarrousel');


-- 
Pan
admin@salvador.venice.ca.us
http://www.la-online.com


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

Date: Sat, 14 Oct 2000 18:32:13 +0100
From: "David R. Hardoon" <davidh@dcs.rhbnc.ac.uk>
Subject: Perl - form interaction
Message-Id: <39E8989D.80F7F1F2@dcs.rhbnc.ac.uk>

Hello,
i have a question about perl,
how can I send data from it to a form?
<form.....>
</from>

and how can I write the script so when it is
run from the web as cgi it wont stop running?

thanks,


----------------------------------------------------------------------------
David R. Hardoon                     
Bsc Degree                           Computer Science Dept.
Computer Science with AI             Royal Holloway University of London

Mobile Num: +447967634954
Fax Num   : +447974836407

http://www.cs.rhbnc.ac.uk/~davidh/

 Uni address    -   D.R.Hardoon@rhul.ac.uk
 Dept. address  -   davidh@dcs.rhbnc.ac.uk
 Mobile address -   daymeyen@yourwap.com
 Phone texting  -   daymeyen@bigfoot.com

 "Danger doesn't lurk humanity whether the computer will
  start to think as man. Humanity will be in danger when 
  man will start to think as a computer."
                                       - Sydney Y. Harries


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

Date: Sat, 14 Oct 2000 08:38:11 -0700
From: "Christopher M. Jones" <christopher_j@uswest.net>
Subject: Re: Problem on apache web server
Message-Id: <j5%F5.1084$pm2.130042@news.uswest.net>


"Nicolas Teissier" <teissier@ismea.imt-mrs.fr> wrote:
> Hello,
>
> I have installer on my computer a web server apache 1.3 on windows98
> It works well but It doesn't read my scripts in Perl even if Perl is
> installed on my computer
> In the error.log, I have :
> "2)No such file or directory: couldn't spawn child process:
> d:/apache/cgi-bin/formulaire.pl


Sounds like one of two possible problems.  Either, you have
your apache settings messed up and d:/apache/cgi-bin is not
the correct location for your cgi-bin files (which it doesn't
seem like that's the case).  Or, you don't have the proper
shebang line in your perl script.  Make sure it points to
the ActivePerl perl.exe file.

i.e.

#!C:/ActivePerl/bin/Perl.exe

or wherever perl is installed.




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

Date: Sat, 14 Oct 2000 09:18:00 -0700
From: Pan <admin@salvador.venice.ca.us>
Subject: Re: question
Message-Id: <39E88738.E54E9738@salvador.venice.ca.us>

People:  There is no one "right" way of doing things in Perl.  What fits
in with one person's particular programming idiom might not fit into
someone else's.  That doesn't make one person's method any more valid
than another. The best method in Perl is the one that works best for you
and yours.

Now play nice!

Uri Guttman wrote:
> 
> >>>>> "JS" == Joe Schaefer <joe+usenet@sunstarsys.com> writes:
> 
>   JS> You're not shortsighted enough to see that this example is of no
>   JS> more complexity than opening/closing the files in sequence.  I'm
>   JS> sure that in your experience you've needed to keep multiple files
>   JS> open, and read/write to them at a number of different places in
>   JS> your code. I'll even bet you've written a few scripts that
>   JS> required debugging? If not, they I guess I'm never going to get
>   JS> the KISS principle across to you.
> 
> and you will never get to be an experienced programmer. idioms,
> shortcuts and other tools are the stock in trade of experienced
> programmers. if you want to program in kiddie speak, go ahead, but not
> for me.
> 
>   >> Which is simpler?  Using $. or making a counter variable for each file,
>   >> and incrementing it when you need to?
> 
>   JS> IMHO, shortcuts like $. are for experienced perl programmers.  The
>   JS> original poster does not fit that bill. Shortcuts are good things,
>   JS> but they should remain shortcuts, not standard coding practice.
> 
> ok, the you should only program with turing machines. skip the
> assemblers, high level langauges and perl.
> 
>   JS> If we all taught people shortcuts from the very beginning, you'd
>   JS> wind up with little more than spaghetti code after the complexity
>   JS> of a project reached a few hundred lines.  Scenario: if you were a
> 
> who ever said that? but it's obvious, you know better. teaching about a
> useful perl variable is not advocating spaghetti code. you have no
> logcial way to jump to that conclusion. you sound like moronzilla's
> brother and want to stop all useful things from being used.
> 
>   JS> Or you can avoid all this at the expense of a few additional bytes
>   JS> of memory, and some clean coding practices.  I think we should be
> 
> a few extra bytes everywhere and what do you have? omnimark, the
> anti-perl!
> 
>   JS> recommending to new perl programmers that they go ahead and burn
>   JS> the bytes and KISS.  The better they get, the lazier they can be-
>   JS> but that priviledge should be *earned*, not given away at the
>   JS> beginning.  Base on the question the original poster asked, and
>   JS> the code he submitted, I don't think he's earned that right- but
>   JS> if you want to continue to debug for him, feel *free*.
> 
> and what rights have you earned here? you have just started posting and
> have obviously not done the requisite lurking. teaching new ideas to all
> levels is common practice here. so is referring to the fine manuals to
> be read instead of quoting them all the time.
> 
>   JS> I've said all I'm going on this subject- so feel free to put your final
>   JS> comments on the above.  I'm sure they'll be be "definitive".
> 
> well, anything will be better than what you have said. and with your fun
> attitude you will just be killfiled by most of the regulars here. have
> fun!
> 
> uri
> 
> --
> Uri Guttman  ---------  uri@sysarch.com  ----------  http://www.sysarch.com
> SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
> The Perl Books Page  -----------  http://www.sysarch.com/cgi-bin/perl_books
> The Best Search Engine on the Net  ----------  http://www.northernlight.com

-- 
Pan
admin@salvador.venice.ca.us
http://www.la-online.com


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

Date: Sat, 14 Oct 2000 10:17:14 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: question
Message-Id: <39E8951A.7DBEDECF@stomp.stomp.tokyo>

Neo James Crum wrote:
 
> Joe Schaefer wrote:

> > > Which is simpler?  Using $. or making a counter variable for each file,
> > > and incrementing it when you need to?

> > IMHO, shortcuts like $. are for experienced perl programmers.
> > The original poster does not fit that bill. Shortcuts are good things, but
> > they should remain shortcuts, not standard coding practice.
 
> On that logic, newbies shouldn't use the print statement either.


A choice of using a counter or using $. is a personal
choice for each person to make, and either choice is
correct. Both choices, each have benefits and detriments.
It is quite incorrect and rather rude to critique others
for either choice. All of you within this thread are wrong
as a result of not respecting choices made by others
regarding personal programming style.

Fortunately, we have choices and are not required to
adhere to promulgated dictates of others.


Godzilla!
-- 
Dr. Kiralynne Schilitubi ¦ Cooling Fan Specialist
UofD: University of Duh! ¦ ENIAC Hard Wiring Pro
BumScrew, South of Egypt ¦ HTML Programming Class


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

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


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